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EDITORIAL 


Encore une fois, ce JPC est encore un peu en retard. Nous espérons que vous 
nous en excuserez lorsque vous en connaitrez la raison. En effet, ce retard est dû 
au fait que nous venons de passer un mois un peu fou, pendant lequel nous avons 
récupéré, trié et sélectionné l'équivalent de 16 Mo de programmes et fichiers en 
tous genres, destinés aussi bien aux HP48 qu’aux HP95/HP100 ! Bien sûr, si 
nous avons récupéré ces fichiers, c’est pour vous en faire profiter. Et puisque 
nous Savons que vous êtes toujours impatients d'obtenir de nouveaux 
programmes pour vos machines préférées, nous commençons la distribution dès 
ce mois ci. D’autres disquettes devraient suivre le mois prochain, mais laissez 
nous travailler ! 


L’autre grande information de ce mois est notre récente adhésion au réseau 
CompusServe. Hormis le fait de pouvoir récupérer des programmes très récents 
(certains inclus dans une des disquettes auront moins de quinze jours au moment 
où vous lirez ces lignes), cette adhésion nous permet enfin de renouer des 
contacts plus directs avec les principaux acteurs du monde HP, dont bien 
entendu certains membres des équipes de dévelopement de nos machines 
préférées. La seule mauvaise surprise (non, une des deux mauvaises surprises 
dira notre cher trésorier) étant que que si l’on désire prendre connaisance de 
tous les messages, et grapiller quelques informations intéressantes, il nous faudra 
probablement se réserver au moins une heure de lecture par jour... 


Tout ceci expliqué, vous comprendrez que nous n'avons pas vraiment eu le temps 
de nous consacrer à fond à nos articles. Il vous faudra donc attendre un petit 
mois avant d’avoir des précisions à propos de certaines informations dont nous 
avons eu connaissance, comme la possibilité de tripler la fréquence des HP48 ou 
l'annonce d’un disque dur externe de 80 Mo, à la norme PCMCIA version 1.0 
(donc adapté aux HP95), proposé aux environs de 1500 F... 


En attendant, bonne lecture ! 
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UNE CONFERENCE 


AUX PAYS BAS 


Comme certains d’entre vous le savent déjà, le club 
Hollandais Prompt-HPGC organise les 28 et 29 mai 
(à Amsterdam) une conférence internationnale. 


Parmi les sujets traités, différents thèmes seront plus 
particulièrement approchés : 


- Les calculateurs et l'Education, 
- Les interfaces Graphiques sur HP48, 
- Les relations entre les clubs utilisateurs. 


Il y aura aussi des tutorials sur la programmation des 
HP48 et HP95/HP100 et (très probablement) des 
présentations de nouveaux matériels. 


Parmi les personnalités ayant déjà donné leur accord, 
on pourra noter la présence de Diana Byrne, qui a 
iccupé le poste de "Project Manager" pendant le 
développement des HP48G/GX... 


Enfin, Hewlett-Packard a annoncé sa décision de 
sponsoriser le dernier évenement du week-end : Pour 
chaque inscription au diner d’adieu (environ 150F), ils 
ajoutent la même somme ! 


Bien sûr, nous espérons nous y rendre. Si certains 
d’entre vous désirent se joindre à nous, qu'ils nous 
contactent le plus vite possible. 


Jacques Belin (123) 
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LE COIN DES CODES HP285S 
NEW LOOK 


Le confort pour moins cher 


La méthode d’entrée des codes des programmes créés 
en System Rpl ou assembleur et fournie dans le coin 
des codes, apporte confort et sécurité. Aussi, dès la 
relance de la programmation dans ces langages, 
depuis le JPC 84 de mars 93, mon premier souci avait 
été de fournir un utilitaire à l'instar de ce qui se 
faisait pour les autres machines. (C’est ainsi 
qu’apparaissait ASSCOD28 et son sous-programme 
INPUT28 pour 1409 octets. L’actuelle version du coin 
des codes (depuis JPC 88) a été améliorée et occupe 
1364 octets pour le corps des programmes. Cela me 
semble encore trop pour les 32Ko de Ram de nos 
HP28S, aussi je vous propose deux nouvelles 
VersiOnSs : 


- En User Rpl avec un seul programme et pour 1032.5 
octets, donc un gain de plus de 340 octets. 

- En System Rpl et assembleur pour 705.5 octets et 
aussi en un seul programme avec la rapidité en plus. 


Les programmes 


Pour les principes de la programmation, pour ne pas 
me répéter Je vous renvoie à la rubrique HP48 de ce 
JPC. Je signalerai seulement que le sous-programme 
intégré au début de AsscoD28 est utilisé aussi à la place 
de la commande INPUT de la HP48 mais inexistante 
sur nos HP28. On remarquera que ce 
sous-programme de saisie est plus simple que celui 
pour HP48 car la commande KEY renvoie le nom de la 
touche et non son numéro. 


Le programme ASSCob28 en User Rpl: 


Par rapport au versions précédentes et pour réduire 
l'encombrement mémoire, l'assemblage de la chaîne 
des codes est différent : 

- La chaîne est découpée en tronçons de 16 
Caractères, ces sous-chaînes sont inversées et 
converties en entiers binaires. Ceux-ci sont 
concalénés Via SYSEVAL # 03B82h (mnémonique &$ en 
System Rpl). Le SYSEVAL # 20238h extrait la partie 
‘données’ de Pentier binaire contenant tous les codes 
(c’est l'équivalent en Sytem Rpl de: THO NTHCOMPDROP). 
Enfin le programme est créé proprement en mémoire 
via le SYSEVAL # O4F3D (TOTEMPOB en System Rpl). 


Remarques: 
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Si cette version de ASSCOD28 est plus courte que les 
précédentes, elle est un peu moins rapide concernant 
la phase  d’assemblage proprement dite. 
L’encombrement mémoire aurait pu être encore 
réduit mais cela aurait posé quelques problèmes pour 
le listage en parallèle de AsscoD28 et Asscon48 dans le 
coin des codes. Comme il vous est proposé une 
deuxième version en System Rpl et assembleur 
beaucoup plus courte et rapide, on ne pourra 
considérer la version en User Rpl qu'à titre 
provisoire. 


Voici donc Asscod28 en User Rpl et allégé. 


ASSCOD28 10325 octets 
cksum # SSCEh 


« RCLF 
« CLLCD 3 DISP 1 DISP "ni 
DO DUP 4 DISP 
DO UNTIL KEY END 
IF DUP "ENTER" == 
THEN DROP 1 
ELSE 
IF OUP 'BACK! == 
THEN DROP 1 OVER SIZE 1 - SUB 
ELSE + DUP SIZE 1 + 5 MOD NOT 1 
IF 
THEN "1 + 
END 
END O 
END UNTIL END 


FC? AND 


» 
HEX 64 STWS 1 SF "nombre d'octets 7?!" 11 
3 PICK EVAL 1 CF STR+ 2 * 16 DUP2 / IP 
3 ROLLD MOD DUP2 0 > + SWAP 1 + # Oh mn 
FOR 1 

DO "ligne " ÿ 1 - R-B # 1000h + -STR 4 6 SUB + DUP 


1 5 ROLL 


; @ NEWLINE 


CODES SU MRSSSS RSR Ses n 7 PICK i < 
LE 

THEN 6 PFICK DUP 4 / IP + 1 SWAP OVER - SUB 
END 

1 FS2C 

1F 

THEN DROP2 SWAP CLMF HALT 

ELSE 8 PICK EVAL 

END DUP 

WHILE DUP " # POS DUP 

REPEAT DUP2 1 SWAP 1 - SUB 3 ROLLD 1 + 25 SUB + 
END DROP O0 OVER SIZE 1 SWAP 

FOR j OVER j DUP SUB NUM j * + 

NEXT 

6 PICK + DUP # FFFh AND 


; @ NEWLINE 
somme de controle ?" 6 ROLL SWAP + fl===i 

11 PICK EVAL MH! SUAP + STR+ == 

IF 


THEH 1 
ELSE DROP2 1000 1 BEEP 1 SF Ô 
END 
UNTIL 
END ROT 5 ROLL DROP2 3 ROLLD + 
NEXT 5 ROLLD 4 DROPN 
Hit SWAP 1 OVER SIZE 
FOR j OUP j DUP 15 + SUB "4" OVER SIZE 1 
FOR i OVER i DUP SUB + -1 
STEP 
SWAP DROP STR+ ROT SWAP # 3B82h SYSEVAL SWAP 16 


STEP DROP # 20238h SYSEVAL # 4F3Dh SYSEVAL SWAP STOF 


CLMF 
++ 
ASSCOD28 


Le programme en System Rpl 


assembleur : 


et 


Ce programme suit les mêmes principes que celui en 
User Rpl pour la saisie des codes. Puis la chaîne est 
convertie en code hexadécimal par une séquence en 


assembleur, donc très rapidement, 


La présentation du listing est identique à celle que 


l’on trouverait dans la rubrique HP48. 


Voici donc ce programme ASSCOD28 qui n’a rien à 


envier à son homologue pour HP48. 


ASSCOD28 
705.5 octets cksum # 9498h 


XRCLF 
f 
:: DOCLLCD DISPROW3 DISPROW2 DISPROWI 
NULLS 
BEGIN DUP DISPROW4 
BEGIN XKEY Æ0= WHILE REPEAT 
$ ENTER OVER EQUAL ITE DROPTRUE 
:: $ BACK OVER EQUAL 
ITE :: DROP ONE OVER LENS #1- SUBS : 
2: &$ DUP LENS #1+ FIVE #/ DROP 
#O<> ONE TestUserFlag OR 
2SKIP APPEND SPACE ; 
FALSE 


= 
; 


UNTIL 

DOHEX SIXTYFOUR dostus ONE SetUserFlag 

$ "nombre d'octets : " NULLS$ DUP 4PICK EVAL 
ONE ClrüserFlag 

DOSTR> #2 #%* COERCE SIXTEEN #/ 

SWAP 2DUP #0= ?SKIP #1+ 

UNROT #1+ 4ROLL 

ZERO NULLS$ TOTEMPOB 

NULLLAM OUP 2DUP OUP FIVE CN BIHD 

#l+ ONE DO (DO) 


BEGIN $ "ligne : " 

INDEX ad #FFF #+ UNCOERCE %># HXS>5$s- 

FOUR SIX SUBS &$ DUP 

$ "codes 5: & Mouse nuus mous vus " 

SGETLAM INDEXA #< 

IT :: 4GETLAM DUP FOUR #/ SWAPDROP 

#+ ONE SWAP #1- SUBS : 
ONE TestUserFlag ONE ClrüserFlag 
ITE :: &ROLL 2DROP ROT XHALT SWAPDROP : 
:: SGETLAM EVAL : 

SPACES OVER 

BEGIN 2DUP SWAP POS$>4 COERCE DUP#0<> 

WHILE 2DUP ONE SWAP #1- SUBS$ UNROT 

#1+ OVER LENS SUBS &$ 

REPEAT 

ROT 2DROP ZERO OVER LENS 

#1+ ONE DO (DO) OVER INDEX DUP 

SUB$ CARS CHR># INDEXQ #* #+ 
LOOP 

AGETLAM #+ DUP # 1000 #/ DROP 

$ "somme de controle : sm" 6ROLL SWAP "===" 

3GETLAM EVAL 

$ # SWAP &$ DOSTR> HXS># 

#= ITE TRUE 

:: DROP DROPBEEPFALS ONE SetUserFlag : 

UNTIL 2PUTLAM SWAPDROP 1GETLAM SWAP &$ 1PUTLAM 
LOOP 
XSTOF 1GETLAM DUP LENS NULL$ OVER TEN #- EXPAND 
SHAP 


CODE 
gosbvl =POP# 
gosbvl =SAVPTR 
a=a-1 a 
b=a 3 * compteur 
a=dat1 a * adresse mémoire 
d0=a *“ réservée 
di=di+ 
a=dat1 a * adresse chaîne 
d1=a * de codes 
di=di+ 10 * début des codes 
Lchex 39 

Loop a=datl à * conversion 
?a<=c b * ASCII -> HEXA 
goyes inf10 * 
a=a-con b,7 À 

inf10 datO=a 1] ; 
di=di+ à ” 
d0=d0+ 71 x 
b=b-1 a 
gonc Loop 
goving =GETPTRLOOP 

ENDCODE 


SWAPDROP ABND 
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Quelques bonnes adresses 


Jean-François Garnier nous avait donné une liste de 
points d’entrée pour HP28$S avec les mnémoniques 
HP pour HP48 (JPC 87-88) ce qui est très pratique 
car cela permet d’exploiter la documentation HP pour 
HP48 et aussi d'utiliser avec le même confort les 
outils HP de développement ainsi que le 
décompilateur Mon28 de Jean-François Garnier. Voici 
quelques points d’entrée utilisés 1c1 et non donnés 
dans la liste citée : 


#* #07022 DISPROW2 #1BBED 
#- #06F51 DISPROW3 #1BC00 
#/ #07057 DISPROW4 #1BC13 
#O<> #O6E38 DOCLLCD #0112A 
#< #O6E55 DOHEX #31680 
$ # #3F089 DROPBEEPFALS #3FB38 
$ BACK #1CD41 DROPTRUE #3F687 
$ ENTER #19CB1 DUP#O<> #3E9AE 
4% #11D48 EXPAND #3DF66 
&$ #03B82 GETPTRLOOP  #125E5 
1PUTLAM #3DAAA HXS>$s- #31B28 
2PUTLAM #3DABA ITE #3DCA3 
&GETLAM #30962 NULLLAM #3E0EA 
&PICK #30815 POS$># #2283A 
&ROLL #3D65C REPEAT #056B6 
SGETLAM #3D986 SIXTYFOUR #115DC 
6ROLL #3D6B8 SPACES #1DFES 
APPEND SPACE #3E9EB SetUserFlag #OC8A7 * 
CARS #O3AC8 UNROT #3D636 
ClrüserFlag #OC8C8 * WHILE #OS6BF  * 
DISPROW1 #1BBA3 dostws #316F7 


* : adresses qui m'ont été communiquées par 


Jean-François Garnier 
précisions sur le mode d'emploi 


Lorsque ASscoD28 est lancé, répondre au différents 
messages, les différentes entrées se validant avec la 
touche [ENTER]. 


Lors de l'entrée des codes le programme placera un 
espace après chaque groupe de 4 caractères. Si vous 
revencz en arrière (avec la touche 1-1) pour une 
correction et que vous éliminez un espace, lors de la 
réintroduction de caractères 1] pourra y avoir un 
décalage dans la position des espaces mais cela est 
sans conséquences pour la suite des opérations. 


Si, à la suite d’une erreur, le programme demande de 
corriger les codes d’une ligne, ceux-ci apparaîtront sur 
la pile à l'arrêt du programme. Il suffira de faire 
[EDIT] et corriger, puis de relancer avec (CONTI. Ceci 
constitue une différence avec ASScoD48 pour lequel la 
commande INPUT de la HP48 permet d'opérer 
autrement, 
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REHABILITATION 


Dans l'article À la recherche des trésors cachés 
(JPC 91 page 7) je faisais valoir la rapidité de FIND 
(pour HP28) par rapport à la fonction de recherche 
de code du décompilateur MON28 pour HP28. Cette 
affirmation n’est plus exacte car Jean-François 
Garnier à reprogrammé MON28 et la rapidité de la 
fonction est excellente maintenant. Donc ma fonction 
FIND n’est utile qu’à ceux qui ne peuvent scruter la 
Rom HP28 que dans la machine elle-même. 


Guy Toublanc (276) 
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LITTERATURE HP48 


Pour clore cette série d'articles sur les ouvrages pour 
HP48 series G, nous en arrivons avec le livre de 
référence produit par HP. 


Les manuels accompagnant les calculatrices HP sont 
en général moins sommaires que ceux des machines 
des autres marques. Tout d’abord parce que une 
machine HP offre plus de possibilités et d’autre part 
les manuels doivent être à la hauteur de la réputation 
de la marque qui demande à l’acheteur un sacrifice 
financier plus important. La sortie des HP-48 séries G 
s’est accompagnée de deux phénomènes : 


- Dés le lancement de ces séries G et GX, un prix plus 
bas pour des machines aux possibilités étendues, avec 
une Rom deux fois plus importante et pour les GX 
une Ram quadruplée. 


- Paradoxalement des manuels moins importants où 
les bases de la programmation ont pratiquement 
disparu. Pour les séries S nous avions un manuel en 
deux tomes et représentant 885 pages auquel il faut 
ajouter un petit aide-mémoire. Avec les séries G le 
manuel d'utilisation représente 591 pages auxquelles 
110 pages s'ajoutent pour le guide d'initiation, au total 
701 pages. Ce rétrécissement aboutit par exemple à la 
non-documentation de 183 fonctions ou commandes 
sur les 640 listées en fin d'ouvrage, et parmi elles des 
fonctions apparues avec ces nouvelles machines. La 
solution HP : voyez le manuel de référence (en 
option). Ceci peut choquer les utilisateurs qui 
comptent programmer avec leurs machines et devront 
avoir recours au manuel de référence non vendu avec 
la machine et en anglais. La justification de ceci 
repose sur un constat le faible pourcentage 
d'utilisateurs qui programment. Alors pourquoi faire 
payer des pages qui ne seront pas lues par la grande 
majorité des utilisateurs ? 


Voyons ce que contient ce : 
HP 48G Series 

Advenced User’s 
Reference Manual 
Hewlett Packard 

Part Number 00048-90136 
Edition 1 


Le corps de l'ouvrage se répartit en : 
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1 : Programming (82 pages) 


Ceci complète les 22 pages du manuel d'utilisation qui 
renvoie au manuel de référence. Cela donne des 
bases qui seront mises en pratique dans le chapitre 
suivant. 


2 : Programming Examples (58 pages) 


Ce sont 24 programmes avec listings commentés et 
introduction qui permettront au futur programmeur 
de mettre en application les principes exposés dans le 
chapitre 1. Tout n’est pas dit mais cela constitue un 
bon départ. 


3 : Command Reference (425 pages) 


C’est le dictionnaire des fonctions avec leur mode 
d'emploi et la documentation relative aux multiples 
utilisations. Ceci constitue la partie principale de 
l'ouvrage. 


4 : Equation Reference (82 pages) 


Ceci concerne donc une partie de la carte d'équations 
qui à été intégrée dans la Rom. C’est principalement 
la reproduction des différentes équations avec les 
éventuels graphiques qui leur sont relatifs. Tout cela 
est contenu dans la Rom et affichable depuis la HP48. 
Etait-il nécessaire d’en disposer sous forme imprimée 
si ce n'est que pour avoir rapidement une vue 
d’emsemble de ces équations et pouvoir suivre les 
exemples numériques donnés ici? 


Puis viennent les annexes. 


A : Error and Status Messages (17 pages) 


CO 


: Table of Units (4 pages) 
C: System Flags (6 pages) 

D : Reserved Variables (16 pages) 

E : New Commands in the HP 48G Series (7 pages) 


Liste alphabétique des nouvelles commandes avec 
une à trois lignes de description. 


F: Technical Reference (9 pages) 

Il s’agit d'informations concernant : 

- L’occupation mémoire des objets 

- Les règles de simplification utilisées par la HP48 


- Les correspondances utilisées par la HP48 entre 
dérivée et primitive pour lintégration symbolique 


- Le développement des fonctions trigonométriques 
pOur :-+DEF TRG*  -TRG. 


G : Parallel Processing with Lists (7 pages) 


Exposé des nouvelles possibilités d'opérations sur les 
listes. 


Donc un ouvrage pour utilisateur très sérieux. 
Le prix: je l'avais acheté 160 francs, je ne pourrais 
préciser son prix actuel fonction des fluctuations du 


dollar. 


Guy Toublanc (276) 





UNE NOUVELLE DISQUETTE 
POUR HP48 


Une nouvelle disquette est disponible au club. Elle 
comprend la Goodies Disk #9 de J.K. Horn, ainsi que 
HPS (un utilitaire pour PC d’origine française), et 
divers programmes récupérés récement sur 
CompuServe. 


La Goodies Disk #9. 


On retrouve sur cette disquette les rubriques 


habituelles : 
- ANTMS : 


Quelques animations, dont le principal intérêt est de 
montrer comment écrire une animation valable pour 
SX ou GX, tout en tirant parti de la fonction ANIMATE 
de cette dernière. 


- FRANCE : 


Des jeux et quelques utilitaires, mais avec peu ou pas 
de documentation, je n’ai donc pas approfondi. A 
étudier. 


- HACKER : 


On y trouve des utilitaires de conversion 
directory<->library, ainsi que la version 1.06 du 
MLDL de Jan Brittenson (la version 1.01 se trouvait 
sur la Goodies #3) pour S(X) uniquement. Ce 
Machine Langage Developpement Library n'utilise 
toujours pas le jeu de mnémoniques HP, ce que je 
trouve bien dommage bien que soit fourni une table 
de correspondance entre des 2 jeux de mnémoniques. 


- HP : 


De nouvelles versions des utilitaires HP bien connus 
EPSPRINT, PCLPRINT, INPRT, STPWATCH et USAG valables 
pour 48S(X) et G(X). USAG s'applique maintenant aux 
hbrairies comme aux mots standards. Pour les G et 
GX, HP nous fournit gracieusement l’application 
table périodique PTLIB qui avait été "oubliée" lors de 
l'intégration de la carte HPSolve dans la G/GX. 


- MATH 


Rubrique particulièrement bien fournie cette fois. On 
y traite de polynones, de matrices, de transformées de 
Laplace, et bien d’autres sujets. Certaines réalisations 
sont sous forme de librairie, nous n’avons donc plus 
accès aux SOUrCes. 


- POSTING 


Divers articles toujours aussi intéressants, sur des 
aspects peu connus ou des bugs de nos chères 
machines. 


- RPL48 


Le morceau le plus interessant de cette Goodies Disk, 
il s’agit de la nouvelle version des utilitaires de 
développement en System RPL de Detlef Mueller et 
Raymond Hellstern, toujours en GiftWare (alias 
FreeWare, pas d'obligation d’enregistrement). La 
nouveauté est que cette version tourne sur les SX 
comme sur les GX. Je rappelle qu’il faut une carte 
RAM de 128K en port indépendant (port 1 ou 2 pour 
la SX, port 1 pour la GX). 


Pas de révolution donc, mais de petites modifications 
de détails. On trouve les nouveaux +L18+, -RPL+, et la 
table des points d’entrées RPL.TAB valable pour les S 
et G. Il n’y a pas de nouvelle version du debugger qui 
était sur la goodies 8, la GX en est donc privée. 


- UTILS 
On y trouve des utilitaires déjà connus ou non : 


- COMPRESS : nouvelle version du compacteur RE, pour 
S et G. 

RFP, RFU : autre compacteur, pour G uniquement. 

- XYMODEM2 : nouvelle version 2.2 du protocole XMODEM 
pour S(X) (voir GD7). 

- PCT : Le PC Tools Library venant de france, sans 
doc. 

- DBASE : gestion de base de données pour G(X). 

- FONEMAN, PIM100, TELE32 : gestions de carnet d’adresse 
/ téléphone. 
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- SCH48 : gestion d’alarmes 
- SMTK : nouvelle version de cet utilitaire d’assignation 
de touche (voir GD7) 


L'intérêt de cette GD9 me semble donc en 
diminution, en effet on trouve beaucoup de nouvelles 
versions de produits déjà connus nécessitées en 
particulier par l’arrivée de la 48G/GX. Mais 
peut-être est-ce moi qui suis un peu blasé, le nouvel 
utilisateur de 48G(X) y trouvera probablement une 
mine d'informations et d'outils qui le satisferont 
pleinement. 


HPS 1.0 : High Performance Shell For HP48. 


Ce programme FreeWare (pour PC) permet de 
développer pour la HP48 et plus précisement d’éditer 
des programmes (User RPL) sur le PC avec le jeu de 
caractères de la 48 (accents, symboles spéciaux), et de 
transferer par Kermit sans quitter HPS. 


Ce logiciel est très bien réalisé, l'éditeur est au 
standard Borland, multi-fenêtre, avec couper-coller. 


L’aide en ligne est conséquente, avec un index, mais 
ne concerne que lutilisation de HPs, et non pas la 
HP48. 


Il est possible de faire apparaitre une fenetre avec 
La table ASCII de La 48 afin d'inserer facilement 


les caractères spéciaux de celle-ci. Inconvénient, 
Les fichiers générés contiennent Les caractères 
HP4B, et mon pas Les séquences \<<, \>>, …, CE qui 


peut poser des problèmes pour l'impression ou la 
publication (dans JPC par exemple !). 


Petit regret, il ne semble pas possible de configurer 
HPS en mode 43 ou 50 lignes. 


HPS est donc une alternative interessante à la 
solution classique Editeur + Kermit. 


Mon souhait: un shell pour programmer aussi 
simplement en System RPL ! 


Fichiers Compuserve : 


Jacques Belin a récupéré sur CompuServe plus de 3 
Mo de fichiers divers (NDLR : la plupart étant compressés, il 
faut en fait compter environ 6 Mo). Un tri s’est imposé, car 
un certain nombre de fichiers sont soit obsolètes, soit 
déjà diffusés par les Goodies Disks sous d’autres 
noms. J'en ai extrait les applications tournant sur 
HP48, en mettant de côté les textes et les 
programmes pour PC (ils feront l’objet d’une 
prochaine disquette). 
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Un premier coup d’oeil rapide m'a permis de repérer 
quelques sujets interessants : 


- MATH une librairie concernant les calculs 
(numériques et symboliques) sur les polynomes et les 
matrices. 

- ASTRO : une application … d'astronomie bien sûr. 

- Des jeux : dont un StartTrek faisant dans sa version 
préliminaire plus de 35 Ko (que sera la version 
définitive ?). 

- Des utilitaires base de données, éditeur de 
mémoire, solutions à certains bugs de la G(X), 
gestion de l’infra-rouge, bloc-notes, outils graphiques, 
exemples en system RPL, etc … 


Tout cela nous est livré en vrac, et vous demandera 
un peu de travail d'exploration, cependant lorsque 
vous lirez ces lignes, nous aurons eu le temps de 
organiser et de décrire un minimum les sujets sur la 
disquette. 


Jean-François GARNIER (242) 





NUMERO DE SEMAINE 
(ACTE III bis) 


Guy Toublanc m'ayant signalé que tous les 
programmes de calcul du numéro de semaine publiés 
par Robert Pulluard, Guy et moi-même (JPC91, 92 et 
93) souffraient du même défaut, à savoir un résultat 
incorrect pour les années commençant par un jeudi 
(1987, 1998, …), je me suis plongé dans Îles 
algorithmes utilisés (ce que je n'avais pas fait 
précédemment, me limitant à l'optimisation du code), 
et ai finalement trouvé l’origine du problème. 


Si la semaine commence le lundi, et si la semaine 
numéro 1 est la première contenant un jeudi, alors les 
formules correctes pour déterminer le numéro de la 
semaine $ SOnt : 


s=fn+3+r)/7 


avec : 
r = (p-5) MOD 7 
n = numéro du jour dans l’année considéré, 
p = numéro du jour dans la semaine (0 = dimanche, 
1=lundi, …, 6= samedi) correspondant au 
ler janvier de l’année considérée. 


Il 


Mon programme NSEM3 corrigé ne change pas de taille 
et devient : 


NSEM3B 
Checksum: #B615h 78 octets 
« 
DUP DATE IFTE 
-2 ALOG à jj.mmaaaa 0.01 
DUP2 MOD + T + à jj.mmaaaa 1.01aaaa 
DUP ROT à l.0laaaa 1.01aasa jj.mmaaaa 
DDAYS à + a 1.01aaaa (n+3) 
3.031989 ROT a (n+3) 3.031989 1.01aaaa 
DDAYS 7 MOD a En+3) r 
+ 7 / FLOOR a résultat ! 


Jean-François GARNIER (242) 


BIEN SE COMPRENDRE 


Si j'ai pu constater, avec plaisir, que le cercle des 
programmeurs en System Rpl et assembleur publiant 
dans JPC, venait de s’agrandir, je me suis aussi rendu 
compte que les outils de développement n'étaient pas 
les mêmes pour tous. Si cela n’a aucune incidence sur 
le résultat, la présentation des listings et des 
explications peuvent dérouter des lecteurs utilisant un 
seul type d'outils. Ceci a pu éventuellement se 
produire avec les articles de Arthur Ripoll dans le 
JPC 94. Ces articles ont le mérite de donner d’utiles 
informations mais l’auteur aurait dû préciser, dès le 
début, les outils ou librairies qu’il emploie. 


Voyons d’abord quelques points relatifs à l’article 
L'insertion de datas en assembleur : 


Arthur utilise lassembleur ASM-FLASH qui est une très 
bonne librairie, d'exécution rapide, avec différentes 
options et qui fut, jusqu’à l’arrivée de la librairie -RPL- 
de Detlef Mueller et Raymond Hellstern, sans 
concurrente pour l’assembleur sur HP48. Pour ma 
part j'utilise, sur HP48, plus souvent cette dernière 
car elle est très largement compatible avec les outils 
de développement HP, alors que ASM-FLASH ne l’est 
pas. 


ASM-FLASH peut-être préférée par ceux qui n’ont pas 
beaucoup de place dans leur machine, en particulier 
les propriétaires de HP-48 sans ports d'extensions. 


Revenons aux différences que l’on peut trouver dans 
la deuxième méthode concernant les datas. La 
séquence pour ASM-FLASH : 


A=PC 
GOINC Datal 
A=A+C A 


*Datai 
$hhhhh... 


où hhhh... sont les données en hexadécimal. 
est équivalente, pour les autres compilateurs cités, à : 


A=PC 
Tél LC(S) (Datal)-(ici) 
A=A+C À 


Data NIBHEX hhhh... 


De même pour des données a32a... en ASCII, au lieu 


de : 
taaaa... 
On aura. 
NIBASC aaaa.... 


. 


Passons à Particle suivant sur la vérification des 
arguments dans une librairie. 


Arthur donne les adresses de routines vérifiant le 
nombre d'arguments, et cela avec les mnémoniques 
du livre Voyage 48 : 


Mais les routines de vérification du nombre et des 
types d'arguments étant ignorées dans le livre cité, 
notre ami nous les précise avec des mnémoniques 
dont j'ignore la provenance : 


COHÉTT sg LCHKTS 
correspondant chez HP à : 

CK18Dispatch ......... CKS&Dispatch 
Il aurait été plus simple que tout le monde parle le 
même langage, Nous ne pouvons en rendre 


responsable, ici, notre ami, mais tout simplement 
celui qui est à l’origine de cette belle pagaille. 
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Puis vient un petit programme-exemple d'utilisation 
de LCHKT1 ou Cki8Dispatch. Le listing correspond à 
celui qui pourrait être compilé par la commande $-+ 
de la librairie DEVLI8 : 


PRG 
$ 18ECE 
x 00033 


qui traduit avec le langage HP donnerait : 


CK1&D1ispatch 
#33 


Par ces simples exemples on voit qu'il y a quelques 
problèmes qui se posent pour une publication telle 
JPC dont l'objectif n’est pas seulement de faire 
profiter ses lecteurs de programmes mais aussi 
d’aider par des articles explicatifs ou des listings qui 
sont des exemples de programmation. L'utilisation 
d'outils divers peut se faire naturellement mais 
peut-être avec quelques précautions en précisant les 
librairies ou compilateurs utilisés, l’origine des 
mnémoniques. 


Il pourrait être souhaitable que chacun fasse profiter 
les autres de son expérience comme utilisateur de 
compilateurs. Une synthèse de cela serait réalisée en 
s'appuyant sur des exemples. Comme je lai dit la 
librairie ASM-FLASH pourra être préférée par des 
programmeurs avec des machines peu riches en 
mémoire et donc ces derniers doivent pouvoir publier 
leurs travaux qui seront toujours les bicnvenus dans 
IPC 


Une table d’équivalences serait à établir pour ces 
outils et cela en réunissant les acquis de chacun. 


De temps en temps, et pour des programmes assez 
courts, les listings utilisables par deux types de 
compilateurs seraient publiés en parallèle comme j'ai 
eu l’occasion de le faire dans 48Sxtant, le journal de 
notre ami Robert Pulluard. Cela permettrait aux 
habitués d’un type de compilateur de comprendre le 
langage des autres. 


Comme je ne me contente pas de prêcher la bonne 
parole, vous devriez trouver dans ce JPC, un article 
relatif au coin des codes avec un listing où sont 
précisés les compilateurs utilisables en System Rpl 
pour ce type de listing. 
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En attendant que les petits problèmes ci-dessus se 
résolvent, je souhaite que notre ami Arthur Ripoll 
nous rejoigne encore souvent et crée des émules. 


Nota : 


Ci-dessus j'ai rectifié quelques erreurs d'impression 
qui s'étaient glissées dans les articles d'Arthur : 

- Les mnémoniques de l’assembleur doivent être en 
majuscules pour être acceptées par ASM-FLASH, CE qui 
n’est pas le cas de lassembleur sAsM de HP qui 


accepte indifféremment majuscules et miniscules. 


- Les caractères spéciaux HP48 étaient mal transcrits. 


Guy Toublanc (276) 





VOYAGE AU CENTRE... 
DES FRACTALES ! 


Voici un petit programme pour tracer des ensembles 
de Mandelbrot sur votre HP48 preférée. 


Voyons d’abord très rapidement comment lon 
détermine un ensemble de Mandelbrot. De manière 
théorique, on peut dire que si l’on prend chaque point 
du plan complexe et qu’on les soumet indéfiniment au 
calcul suivant : 


- À chaque complexe on fait correspondre son carré 
et on lui additionne le complexe initial (les 
coordonnées du point). 


- Si le module du résultat tend vers l'infini, le point 
initial n'appartient pas a l’ensemble de Mandelbrot, 
s'il reste fini, le point initial appartient a cet 
ensemble. 


- Comme il n’est pas possible de poursuivre les calculs 
à l'infini, on fixe une profondeur de calcul au début 
du programme. De plus, pour tester le résultat, il faut 
se fixer une fontière entre nombre infini et nombre 
fini. Il apparait qu’au delà d’un module égale à 2, les 
nombres complexes tendent assez rapidement vers de 
fortes valeurs. Donc pour faire partie de l’ensemble, il 
faudra que le resultat soit inférieur à 2. 


Ce qui nous donne en UserRPL : 


< 
+ depth 
« 
ERASE “hé Te 
FOR Y 
“Tia à 
FOR X 
X Ÿ R+C OÙUP T depth 
FOR 4 
SQ OVER + 
NEXT 
IF ABS 2 < 
THEN PIXON 
ELSE DROP 
END 
1 STEP 
.1 STEP 
x 


x 


Le programme que j'ai écrit étant en assembleur, il 
permet d’obtenir un tracé plus rapide. 


Pour les calculs sur les nombres réels, j'ai choisi de 
les coder en nombres réels à virgule fixe ce qui 
permet des calculs plus rapides. Ils sont codés sur 64 
bits (sur le champ W). Les 20 bits de poids faibles 
représentent la partie fractionnaire du nombre, les 43 
bits suivants représentent la partie entière du nombre, 
le bit de poids fort est le bit de signe. 


Toujours pour accélérer le programme j'ai essayé de 
reduire la lecture et l'écriture en memoire, et pour ne 
pas avoir à faire de calculs avec les pointeurs DO et 
D1 lorsque l’on accède a la mémoire, le programme 
est copié en RAM puis les données lui sont 
concaténées et enfin le programme commence par 
une écriture directe des adresses des données à tous 
les endoits où l’on charge DO et D1. 


Je m'explique. Chaque fois que l’on a : 
CON(2) #81 


Dx 
REL(5) Label _ donnee 


* DO=(5) 


À la compilation "REL(5) Label_donnee" est remplacé 
par un offset sur la donnée. Lorsque le programme 
est lancé et recopié en memoire, il replace cet offset 
par l’adresse à laquelle est la donnée. Ceci est en fait 
cffectué par le deuxième code qui n’est pas recopié en 
mémoire, ce qui permet de n’utiliser qu’un minimum 
de place. 


Il est possible d’effectuer une alternance de "couleurs" 
en remplacant : 


C=0 par C=0 M 
LCHEX 400000 LCHEX 400000 
7C<A VW ?2C<A W 
GOYES PixOff GOYES In 
D=D-1 A D=D-1 A 

GOC In GOC In 


GOTO Boucle.z GOTO Boucle.z 


In In 
* C=D À C=D Â 
* 2CBIT=0 0 ?CBIT=0 0 


*  GOYES PixOff 
GOSUB PIXON 


GOYES PixOff 
GOSUB PITXON 


On obtient ainsi une alternance de noirs et de blancs 
en fonction de la parité des profondeurs de calcul. Il 
est aussi possible de tester un autre bit que le 0 pour 
obtenir une alternance plus espacée. 


Voici le source du programme : 


MANDEL 


733 octets Cksum # 8AAGh 


CK38Dispatch 
#221 


F 


% 1048576 #* DUP 
%0 %< case 
#CHS #># HXS 1 À 
SWAP bit- 
: 
> 


1LAMBIND ABS 
# SHAP Cr 
ÎGETLAM EVAL SWAP 
ÎGETLAM EVAL &HXS 
&HXS SUAP Cx>x 
IGETLAM EVAL SWAP 
IGETLAM EVAL &HXS 
&HXS SIXTYEIGHT 
EXPAND  ABND 
TURNMENUOFF 
DOCL LCD 
F 
CODE 
Deb 
ST=0 5 
GOSBVL =SAVPTR 
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LCHEX 1E 
B=C B 
CON(2) #B1 
Da 
REL(5) C.Y 
A=DATO 4 
CONC2) #F1 
D3 
RELCS}) SclY 
C=DATI W 
B1 
GOSUB A+C 
B=B-1 B 
GONC B1 
DATO=A 4 
RO=A 
DO=00+ 16 
D1=D1+ 16 
LCHEX 40 
B=C 6 
A=DATO 4 
C=DAT1 4 
Be 
A=A-C 4 
B=B-1 B 
GONC Ba 
DATO=A 
DO=D0+ 16 
DATO=A W 
DO=D0+ 16 
C=RO 
DATO=C W 
DO=D0+ 16 
DATO=A W 


Boucle.l 


Boucle.J 
CONC2) #F1 
Dé 
REL(5}) Itter 
C=DATT À 
D=C À 


CONÇ2) #B1 
D5 

REL(5} Cur.Y 

A=DATO 4 

R1=A 

R3=A 

DO=D0+ 16 

C=DATO W 

R2=C 

Rä=C 


Boucle.2 


C=Rà 
RÜ=C 
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* 


* 


# 


A=C 4 
GOSUB A*C 
R2=A 

C=R1 

A=C 4 
GOSUB A*C 
C=R2 

ACEX W 
A=A-C W 
C=R4 
GOSUB A+C 
R2=A 


A=RO 

=A MW 
GOSUB At+C 
C=R1 
GOSUB A*C 
C=R3 
GOSUB At+C 
R1=A 


C=A W 
GOSUB AC 
RO=A 

A=RE 

C=A W 
GOSUB A*C 
C=RO 
GOSUB A+C 


C=0 4 
LCHEX 400000 
2C<A W 
GOYES PixOff 


D=D-1 A 
GOC In 
GOTO Boucle.z 


C=D A 

?7CBIT=0 Ô 

GOYES PixOff 
GOSUB PIXON 


PixOff 


D7 


CON(2) #B1 * DO=(5) 


REL(5) J 

A=DATO A 

LCHEX 00082 

?A=C A 

GOYES MNEXTI 

A=A+1 À 

DATO=A A 

CONC2} #81  * DO=(5) 


D8 


D9 


D16 


Fin 


NEXT1 


D10 


D11 


D12 


D13 


D17 


REL(35) SclX 
CON(2) #FT  * D1=(5) 


REL(5) Cur.Xx 
A=DATI W 
C=DATO W 
GOSUB A+C 
DATI=A W 


CON(2) #81  * DO=(5) 


REL(S) Pix.Xx 
A=DATO À 
A=A+1T A 
DATO=A A 


GOTO Boucle.) 


GOSBVL =GETPTRLOOP 


CON(2) #B1 * DO=(5) 


REL(5) Orig.x 
A=DATO W 
DO=D0+ 16 
DO=D0+ 16 
DATO=A W 
DÜ=D0+ 16 
DO=D0+ 15 

A=0 À 

DATO=A À 


CON(2) #B1 * DO=(5) 


REL(S) I 

A=DATO A 

LCHEX O003F 

?A=C À 

GOYES Fin 

A=A+1 À 

DATO=A À 

CON(2) #B1 * DÜ=(5) 


REL(5) SclY 
CON(C2) #F1  * D1=(5) 


REL(5) Cur.Ÿ 
A=DAT1 W 
C=DATO W 
A=A-C 4 
DATI=A W 


CONC2) #81 * DOÜ=(5) 
REL(S) PiXx.Y 


A=DATO À 
A=A+1 À 


A+C 


Neg1 


A°C 


Posà 


Neg 


Pos 


DATO=A A 
DO=D0+ 5 

A=0 À 

DATO=A A 
GOTO Boucle.l 


B=0 S 

CONCS) #714818 * B=B+CON S,8 
B=B&A S 

?B#0 S 

GOYES Negl 

B=0 S 

CON(6) #714818 * B=B+CON S,8 
B=B&C S 

?B#0 S 

GOYES Neg1 

A=A+C W 

B=0 S 

CONCé) #714818 * B=B+CON 5,8 
B=B&A S 

?B=0 S 

RTNYES 

A=0 K 

A=-A W 

ASRB W 

RTH 


A=A+C W 
RTN 


ST=0 0 
ASLC 
?ABIT=0 3 
GOYES Posàa 
ASRC 

A=-ÀA W 
ST=1 0 
ASLC 


ASRC 

CSLC 
?CBIT=0 3 
GOYES Pos3 
CSRC 

C=-C 4 
CSLC 
?2S7=1 0 
GOYES Neg 
ST=1 0 
GONC Pos3 


ST=0 Q 
CSRC 


2C>A W 
GOYES NoExchange 
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ACEX W 
NoExchange 

?A=0 4 

GOYES FB 


P= 0 

B=0 4 

ABEX W 
Boucle* 

B=B-1 P 

GOC NoRetenu 

A=A+C 4 

GOC Big 

GOTO Boucle* 
NoRetenu 

CSL W 

P=P+1 

GONC Boucle* 

P= 0 
FB 

GOSBVL #OD5ES5 
Retour* 


?7ST=0 0 
RTNYES 
A=-A W 
RTN 
Big 
A=0 4 
A=A-1 W 
ASRB 4 
GOTO Retour* 


PIXON 
CON(2) #B1  * DO=(5) 
D14 


REL(5) 
C=DATO 
DO=D0+ 
A=DATO 
RO=C 

ST=0 0 
ST=1 1 
GOSBVL 
GOVLNG 


Data 
Itter 
CONC8) 


Pix.Y 
À 
5 
Â 


#138F2 
#13B8CA 


CONC8) © 


ScLY 
CON(8) 
CON(8) 
SCLX 
CON(8) 


CONCE) 0 


CON(8) 
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CON(8) O 
C.x 

CON(8) 0 

CON(8) Q 
Or1g.Xx 

CON(B) 0 

CON(8) 0 
Cur.T 

CON(8) 0 

CON(8) Q 
Cur.Xx 

CONC8) 0 

CON(8) 0 
Pix.Y 

CON(5) 0 
Pix.x 

CON(5) 0 


CON(5) 0 


CONC5) 0 
ENDCODE 


#1 
ASSEMBLE 
CON(5) #02911 
REL(5) Deb 
RPL 
# FFF62 
SWAP 
#- 
SUBHXS 
SWAP 
&HXS 


CODE 
A=DATI À 
D1=D1+ 5 
D=D+1 À 
GOSBVL =SAVPTR 
D1=A 
R1=A 
LCHEX O2DCC 
DATI=C À 


GOSUB DATA 
REL(5) Deb 
REL(5) De 
REL(5) 03 
REL(5) Dé 
REL(5) D5 
REL(S) D7 
REL(5) D8 
REL(5) D9 
REL(S) D10 
REL(S) D11 
REL(5} D12 
REL(5) D13 


REL(S) D14 
REL(5) D16 
REL(5) D17 
CON(5) 0 
DATA 
C=RSTK 
B=C A 
DO=C 
A=DATO À 
A=A+B A 
D1=D1+ 10 
CDÎEX 
C=C-A À 
RO=C 
BBKK 
B=B+CON A,5 
DO=00+ 5 
A=DATO A 
?2A=0 A 
GOYES FIN 
C=RO 
A=A+C A 
A=A+B A 
D'1=A 
C=DAT1 À 
A=A+C A 
DATI=A À 
GOTO BBKK 
FIN 
GOSBVL =GETPTR 
A=R1 
PC=(A) 
ENDCODE 
# 40 # 83 MAKEGROB 
ABUFF OVER ZEROZERO 
GROB! 


Pour utiliser ce programme, entrer dans la pile : 


4: coordonnees du centre du grob (complexe) 
23 distance entre pixel (complexe) 
1: profondeur (reel) 


Par exemple (-.5,0) (.03,.03) 20 pour une vue 
générale de l’ensemble de Mandelbrot. 


Voici un petit programme en UserRPL pour pouvoir 
ce deplacer dans l’ensemble de Mandelbrot : 


DUP PICT STO 
€ } PVIEM 
C+R ROT C+ ROT 
DUP2 
IF < 
THEN SWAP 


END & ROLL 4 ROLL 
DUP2 
IF < 
THEN SWAP 
END ROT SWAP R-C 
ROT ROT R\->C SWAP 
+ coini coinè 
Lo 
coin coiné + 2 / 
coini coin - C-R 
64 / ABS SWAP 131 / 
ABS SWAP R-C 
fPPAR’' 1 coini PUT 
fPPAR' 2 coin2 PUT 
32 


x 


Il prend en entrée un objet graphique et le PPAR doit 
être modifié en fonction de l'échelle de l’objet 
graphique. 


Par exemple, je veux tracer la vue générale : 


{-.5,0) (.03,.03}) 20 Mandel 
Je modifie le PPAR comme suit: 


€ (-2.465,-.96) (1.465,.96) 
X O (0,0) FUNCTION Ÿ } 


Je lance le programme ci-dessus. Il me montre la vue 
générale. 


Je fait (Shift-Gauche] [Fleche-Gauchel]l. 


Là, je positionne le curseur dans un coin du carré que 
je veux sélectionner et j’appuie sur CENTER], puis je 
vais dans le coin opposé et de nouveau j’appuie sur 
CENTER] puis sur [ON]. Le programme a calculera les 
deux premiers arguments qui vont me servir a Zoomer 
sur la zone selectionnée. 


Je n’est plus qu’à choisir la profondeur du calcul et à 
relancer Mandelbrot. 


Attention! : À chaque nouveau dessin correspond un 
ppar. Si vous voulez zoomer sur deux zones d’un 
meme dessin, sauvegardez le PPAR avant les zoom. 


Pierre Silvestre de Sacy (572) 
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LE COIN DES CODES HP48 
NEW LOOK 


Rétrospective 


Le coin des codes HP48 est apparu pour la première 
fois dans le JPC 78 de juillet 92, mais avec un simple 
assembleur. Depuis novembre 92 (JPC84) cette 
rubrique s’est enrichie avec un assembleur plus 
évolué et évitant de vérifier l’ensemble des codes 
entrés, en cas d’erreur de frappe, technique déjà 
utilisée pour le HP71 mais dont l'algorithme de calcul 
des sommes de contrôle a dû être revu. 


Depuis mars 93 la rubrique HP28 a été dotée aussi de 
son coin des codes. L'absence de la commande INPUT 
pour HP28 m'avait obligé a en créer une 
spécialement adaptée au programme ASSCOD28, ce qui, 
tout compte fait, était un avantage car offrant la 
possibilité de gérer automatiquement l'introduction 
des espaces entre groupes de codes. On en était arrivé 
au paradoxe que ASSCOD48 était moins pratique que 
ASSCOD28. D'autre part ces deux programmes, 
présentés séparément dans le coin des codes, 
prenaient beaucoup d’espace. Pour toutes ces raisons, 
une nouvelle présentation voyait le jour dans le JPC 
88, avec les deux programmes listés ensemble et un 
INPUT48. Ainsi ASSCOD48 et son sous-programme 
INPUT48 occupent 1405 octets pour les corps des 
programmes. 


Si ASSCOD48 est à la fois d'utilisation pratique et 
sécurisante, il me semblait encore trop gourmand en 
mémoire. Aussi je vous propose deux nouvelles 
formules plus économes : 


- En User Rpl, un seul programme de 1114.5 octets 
donc plus de 290 octets économisés et tout en un. 
Cette version est utilisable par tous et les affichages 
sont plus rapides qu'avec les versions précédentes. 


- En System Rpl pour 699 octets, en un seul 
programme avec la rapidité en plus. Cette version ne 
peut donc être introduite que par ASscod48 en User 
Rpl 


Les programmes 

Si les techniques de programmation de AsSSCoD48, dans 
ses différentes versions, sont passées inaperçues car 
non commentées, 11 m'a semblé utile d'apporter, à ce 
stade, quelques précisions. 

Voyons d’abord les principes de ASscob48 en User 


Rpl. 
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Pour gagner des octets, le programme n'utilise pas de 
variables mais seulement la pile. Après la sauvegarde 
de l’état des indicateurs, un programme de saisie des 
codes est déposé sur la pile sans être évalué. Ce 
dernier initialise laffichage puis attend la frappe 
d’une touche. 


-Si touche [ENTER] alors sortie du programme de 
saisie. 


-Sinon si touche [-1 alors efface le dernier caractère. 


-Sinon convertit la position de la touche en caractère : 
AùàF 7à9 436 1à3 et 0 


Après chaque groupe de 4 caractères ajoute 1 espace. 


Revenons au programme principal après le ’»’du sous 
programme. Après l'introduction du nombre d’octets 
du programme à créer calcul du nombre de lignes de 
16 codes à entrer et du résidu éventuel. Puis une 
boucle correspondant au nombre de lignes à entrer. 
Prépare l'affichage pour le sous-programme de saisie 
et en fonction de la longueur de ligne à entrer. Le flag 
1 repère une réitération d’entrée de codes à la suite 
d’une erreur, dans ce cas l'entrée se fait simplement 
par LINPUT] car les codes à corriger sont réaffichés. 
Sinon l'entrée se fait par le sous-programme de saisie 
avec (EVAL]. Une copie de la ligne de codes est allégée 
des espaces et une somme de contrôle est calculée 
pour cette ligne et ajoutée à celle des lignes 
précédentes pour être comparée à celle qui est 
demandée. Cette dernière est entrée par le 
sous-programme de saisie. S'il y a erreur un BEEP est 
émis avec demande de correction. Si tout est correct, 
la ligne est ajoutée à la chaîne des codes et Île 
checksum général est mis à jour. Après la dernière 
ligne entrée puis vérifiée on ne garde que : 


- au niveau 2 : l’état des indicateurs. 
- au niveau 1 : la chaîne de l’ensemble des codes. 


Celle-ci est transformée en objet graphique en la 
faisant précéder du prologue et des dimensions et via 
STR+ (méthode du livre voyage..hp48). La partie 
‘données’ de l’objet graphique est extraite avec les 
SYSEVALS équivalents à la séquence en System Rpl: 


FOUR NTHCOMPDROP (donc un Syseval en moins que dans 
voyage). Puis le programme est créé proprement via 
un NEWOB et les indicateurs sont restaurés. 


Voici donc le listing de cette nouvelle mouture plus 
discrète : 


ASSCODAS 
1114.5 octets cksum # 621Eh 


« RCLF 
« CLLCD 3 DISP 1 DISP "‘ 
DO DUP 4 DISP 
DO UNTIL KEY END 
IF DUP 51 == THEN DROP 1 
ELSE IF OUP 53 == 
THEN DROP 1 OVER SIZE 1 - SUB 
ELSE 
CASE DUP 17 < THEN 54 + END 
DUP 66 < THEN 7 - END 
DUP 76 < THEN 20 - END 
DUP 86 < THEN 33 - END 


DROP 48 END 
CHR + DUP SIZE 1 + 5 MOD NOT 1 FC? AND 
IF THEN ! !! + END 
END 0 
END 
UNTIL 
END 


+ 
HEX 64 STWS "nombre d'octets 7?! 11 INPUT 
1 CF STR+ 2 * 16 DUP2 / IP 3 ROLLD MOD 
DUP2 Q > + SWAP T + # Oh M 7 5 ROLL 
FOR 1 
DO "Ligne " 1 1 - R-+8 # 1000h + -STR 4 6 SUB + DUP 
F &: NEWLINE 
COVER OS RES SET Fe SES NT PIECE 1 © 
IF 
THEN 6 PICK DUP 4 / IP + 1 SWAP OVER - SUB 
END 1 FS?C 
IF 
THEN DROP2 SWAP OVER ! a corriger" + 
€ -1 } ROT + INPUT 
ELSE 8 PICK EVAL 
END DUP 
WHILE DUP "11 POS DUP 
REPEAT DOUP2 1 SWAP 1 - SUB 3 ROLLD 1 + 25 SUB + 
END DROP 0 OVER SIZE 1 SWAP 
FOR j OVER j COUP SUB NUM J * + NEXT 
6 PICK + OUP # FFFh AND 
n  NEWLINE 
somme de controle 7?" 6 ROLL SWAP + !=== 
11 PICK EVAL "4 SWAP + STR+ == 
PE 
THEN 1 
ELSE DROP2 1000 1 BEEP 1 SF 0 
END 
UNTIL 
END ROT 5 ROLL DROP2 3 ROLLD + 
NEXT 5 ROLLD & DROPN 
HGROB 8 " OVER SIZE 2 / "M + + SWAP + STR- 
# 4017h SYSEVAL # 64B9Ch SYSEVAL NEWOB SHAP STOF 


3 


Passons à ASSCOD48 en System Rpl. 


Les principes de programmation sont identiques à 
ceux ci-dessus. Les caractères accentués 6 et à ont été 
introduits dans les messages pour les puristes et la 
présentation des affichages est améliorée. On pourra 
remarquer le sous-programme de saisie, non évalué, 
au début avec la numérotation des touches, différente 
de celle en User Rpl. Le gain d’octets et de rapidité 
sont à l’avantage de ce langage où l’on utilise des 
objets en Rom et des instructions plus spécifiques ou 
synthétiques (DISPROW7 pour 7 DISP etc). Ici sont 
utilisées 5 variables au nom de longueur nulle ce qui 
facilite la programmation tout en étant économe en 
mémoire contrairement à ce que l’on obtient en User 
Rpl avec les variables globales ou locales. 


Voici donc le listing que vous pourrez comparer à 
celui de Asscon48 en User Rpl. 


ASSCOD48 
699 octets cksum # 420Fh 


KAKRERERERÉERARRÉRERERÉRÉRÉARÉRAERRÉARENRERMERÉARÉRÉRRÉRRARRE 


* fichier source compilable: x 
* sur compatible IBMPC avec: * 
* RPLCOMP du Kit de développement HP pour x 
* compatible IBMPC, programmes et documentation * 
” disponibles dans Goodies Disk #4 où auprès du * 
* club : Kit de dévelopement pour HP48. # 
* sur HPé8 avec: x 
* ->RPL du Kit RPL48 de Detlef Mueller & Raymond * 
x Hellstern, programmes et documentation * 
# disponibles dans Goodies Disk #B pour HP48S/X * 
x et Goodies Disk #9 pour HP48S/X et HP48G/X, ou * 

* 


; auprés du club. 
CC ee D 0e 6 M M M NN RE NN RE RC R N R N  R NN R N RNR R RRNRURÉE 


OLASTOWDOB! XxRCLF 
' 
-: DOCLLCD DUP DISPROWS DISPROW7 
ONE THREE Disp5x7 NULLS$ 
BEGIN DUP DISPROW6 
WaïtForKey DROP 
"=: TWENTYFIVE OVER#=case DROPTRUE 
TWENTYNINE OVER#=case 
:: DROP DUPLENS 1 #1-SUBS$ FALSE ; 
=: SEVEN OVER#> case :: SIXTYFOUR #+ : 
THIRTYFOUR OVER#> case :: TWENTYFOUR #+ : 
THIRTYNIHNE OVER#> case :: SIXTEEN #+ : 
FORTYFOUR OVER#> case #8+ 
DROP FORTYEIGHT 
#>CHR >T$ DUPLENS #1+ FIVE #/ DROP 
#0O= ONE TestUserFlag NOTAND 
IT APPEND SPACE 
FALSE 
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UNTIL 


-. 


DOHEX SIXTYFOUR dostus 
$ "nombre d'octets : " MNULLSTEMP xINPUT 
ONE ClrüserFlag 
DOSTR> %2 %* COERCE SIXTEEN #/ 
SWAP2DUP #0=?7SKIP #1+ 
UNROT #1+ 4ROLL 
£ERO  NULLS$TEMP 
&NULLLAMCY NULLLAM >TCOMP BIND 
#1+ ONE DO (DO) 
BEGIN $ "ligne : " 
INDEXQ #1- #1000 #+ #>HXS HXS>$ 
FOUR SIX SUBS &$ DUP 
$ "\0a\0acodes :!! &$ 


JGETLAM INDEX #< 
IT :: &GETLAM DUP FOUR #/ SWAPDROP #+ 1 #1-SUBS ; 
ONE TestUserFlag ONE ClrUserFlag 
ITE 
:: ADROP SWAPOVER $ " \e0 corriger!" &$ 
#-1 ROT TWO{HN xINPUT ; 
:: 3GETLAM EVAL : 
SPACES OVER 
BEGIN 2DUPSWAP ONE POS$ DUP#0<> 
WHILE 2DUP 1 _#1-SUB$ UNROT #1+ OVERLENS SUBS &$ 
REPEAT 
ROT2DROP ZERO OVERLENS 
#1+_ONE_DO (DO) OVER INDEXd SUBS1# INDEXQ #* #+ 
LOCP 
ÉGETLAM #+DUP # FFF #AND 
$ M\Oa\0asomme de contr\féle : 
M===u 
3GETLAM EVAL 
CHR_# >H$ DOSTR> HXS># 
#=ITE TRUE 
:: 2DROP %100 %10* #1 DOBEEP 
ONE SetUserFlag FALSE ;: 
UNTIL 2PUTLAM SWAPDROP 1GETLAM SWAP&S$ 1PUTLAM 
LOOP 
XSTOF $ !GROB 8 ! ÎGETLAM LENS #1+ #2/ #>5 
APPEND SPACE &$ ÎGETLAM &$ 
ABND 
DOSTR> FOUR NTHCOMPDROP TOTEMPOB 


sm 6ROLL SWAP&$ 


Vous trouverez la liste des codes dans le coin des 
codes. L’assemblage se fera avec l’une des versions de 
ASSCOD48, puis VOUS pourrez ne conservez que cette 
version en System Rpl qui se fera plus discrète dans 
votre HP48. 


Précisions sur le mode d'emploi. 
Lorsque ASscoD48 est lancé, répondre aux différents 


messages, les différentes entrées se validant avec la 
touche [ENTER]. 
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Lors de l'entrée des codes le programme placera un 
espace après chaque groupe de 4 caractères. Si vous 
revenez en arrière (avec la touche t-]) pour une 
correction et que vous éliminez un espace, lors de la 
réintroduction de caractères il pourra y avoir un 
décalage dans la position des espaces mais cela est 
sans conséquences pour la suite des opérations. 


Si, à la suite d’une erreur, le programme demande de 
corriger les codes d’une ligne, ceux-ci s'afficheront via 
INPUT et donc la gestion des espaces ne se fera pas 
dans ce cas et il n’y a aucune obligation de les 
introduire. Il suffit de corriger la ligne de codes et de 
valider avec [ENTER]. 


Guy Toublanc (276) 
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DES NOUVELLES VENUES 
DU CIEL 


Du côté des étoiles. 


À partir du 4 Avril, Hewllett-Packard introduit (en 
collaboration avec Skytel) un nouveau service de 
messagerie radio destinés aux utilisateurs de 
HP100LX. 


Baptisé Starlink, ce service permet d'assurer les 
fonctions suivantes : 


- Réception d’'Email. 

- Reception de message vocaux, retranscrits en texte 
par une opératrice de Skytel. 

- Reception d'informations générales, financières, 
météo... 


Le logiciel intégré permet de mettre à jour 
automatiquement l'agenda et le repertoire 
téléphonique du HP100. 


L'interface matérielle est assurée par la NewsCard, 
une carte PCMCIA fabriquée par Motorola. Elle 
permet de recevoir les messages, même quand la 
carte n’est pas incluse dans le HP100. Une Led et un 
petit buzzer permettent d'indiquer qu'il y a des 
messages en attente. Les données sont stockées dans 
une Ram interne de 128 Ko (dont environ 90 sont 
cependant utilisés pour stocker le logiciel du HP100). 


Fiancièrement, il faut compter 229$ pour la carte, 
Puis un abonnement dont le prix dépend des 
différentes options choisies : taille de la zone de 
réception (locale, régionnale, mondiale), taille 
maximum des messages reçus, nombre de messages 
reçus dans le mois, réception des informations 
générales... 


Comme pour le NewStream, déjà opérationnel pour 
le HP95, un service équivalent devrait probablement 
bientôt être disponible en France. 


Et du coté du Soleil... 

La société SunDisk vient d'annoncer une nouvelle 
carte Flash pour HP100, avec une capacité de 40 Mo 
(80 Mo, pour ceux qui veulent utiliser Stacker). Je 


n'ai pas confirmation du prix, mais il devrait être 
compris entre 1200$ et 2000$. 


Jacques Belin (123) 
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LA NOUVELLE DISQUETTE 
HP95 / HP100 


Comme annoncé dans l'éditorial, nous avons 
récement récupéré un nombre important de fichiers 
destinés aux HP95 et HP100. 


Après une rapide sélection, nous avons décidé de 
répartir ces programmes en plusieurs groupes : 


- Une disquette contenant des programmes 
fonctionnant sur HP95 uniquement. 
- Une disquette contenant des programmes 


fonctionnant sur HP100 et PC, mais ne fonctionnant 
pas sur HP95,. 

- Une disquette de programmes fonctionnant sur les 
deux machines. Cela inclus de nombreux programmes 
System Manager HP95, qui fonctionnent parfaitement 
sur le HP100. 

- Enfin, si la demande existe, une quatrième disquette 
plus destinée aux programmeurs, contenant, entre 
autres, des informations sur les internals des 
palmtops ainsi que de nombreux sources. 


Nous commençons ce mois-ci avec la troisième 
disquette. Les utilisateurs de HP100 vont peut-être 
m'en vouloir un peu de ne pas leur donner tout de 
suite des utilitaires totalement dédiés à leur machine, 
mais 1l leur faudra attendre encore un peu, car le 
contenu de cette dernière disquette n’est pas encore 
totalement défini. D’autre part, j'ai récupéré ces 
derniers jours des programmes HP100 très récents 
(certains datant de moins d’une semaine au moment 
où j'écris ces lignes), mais présentant encore quelques 
défauts de Jeunesse. Je préfère donc retarder un peu 
leur mise en circulation, le temps qu’une nouvelle 
version apparaisse. De toutes façons, je leur rapelle 
que si les deux premières disquettes sont étiquetées 
"HP95", elles contiennent une majorité de 
programmes fonctionnant sur le HP100. 


Comme d'habitude, toutes les applications présentées 
sur cette disquette ont leurs différents fichiers 
(programme, documentations, etc.) regroupés et 
compressés dans des fichiers ZIP distincts. Ceci nous 
permet d’une part d’en mettre plus sur une seule 
disquette, mais aussi de vous inciter à ne redistribuer 
que les archives completes, et non seulement les 
exécutables, comme cela est trop souvent le cas. De 
plus, à l'interieur de ces archives, j'ai aussi compressé 
les exécutables à laide de PKLITE. Ainsi, ils prendront 
moins de place sur le disque de votre palmtop. Veillez 
cependant à les décompresser avent de faire une 
procédure d'installation modifiant des données à 
l’intérieur même du programme. 


Voici donc une liste des fichiers contenus dans cette 
nouvelle disquette. Notez cependant qu’elle n’est pas 
exhaustive et qu’il est possible qu’au moment ou vous 
lirez ces lignes, de nouveaux fichiers auront été 
rajoutés. Dans ce cas, nous vous en tiendrons 
informés dans le prochain JPC. 


Directory UTILS 


Si le HP100 possède une application permettant de 
créer des bases de donées mono-fichier, celle ci 
possède cependant le défaut de ne pas être 
compatible avec les autres programmes tournant sur 
PC. En effet, 1l est nécessaire d'obtenir le Connectivity 
Pack du HP100 pour pouvoir les lire sur PC. C’est 
probablement pour cela que de nombreux utilisateurs 
ont préféré installer Dbase IT ou III sur leur machine. 
Cependant, une solution plus économique existe 
maintenant avec EFMS. Il s’agit d’un générateur de 
base de données mono-fichier permettant de créer de 
facon hbre ses propres écrans de saisie. Le gros 
avantage est qu'il tourne sur PC et les deux palmtops 
et qu'il n’est pas nécessaire de recourir à des 
utilitaires de conversion. 


Un des habitués de nos réunions mensuelles à déclaré 
ne pas être intéressé par le HP95, car on ne peut pas 
y faire tourner AutoCad ! Malheureusement, si je suis 
au regret de vous dire que cela n’est toujours pas 
possible, 1l existe tout de même un utilitaire 
permettant d’afficher les fichiers DXF sur l'écran du 
HP95 ! Une chose à essayer absolument est sa 
fonction de Zoom, permettant de visualiser sur toute 
la taille de l’écran un texte qui n'apparaissait au début 
que sous la forme d’un pixel. Attention cependant à 
ne pas utiliser des fichiers trop complexes, car les 
deux palmtops ne sont pas équipés de coprocesseurs.. 


Un des autres utihaires presents sur la disquette est 
un générateur d’hypertexte. La conversion des fichiers 
originaux est assez simple et le programme admet 
deux formats de fichiers, dont un compressé. 


Dans la première disquette pour HP95, nous vous 
avons présenté un programme permettant de 
convertir (au cas où vous ne savez pas quoi en faire !) 
votre HP95 en télécommande. Nous vous présentons 
ici une nouvelle version fonctionnant parfaitement sur 
les deux machines. 


Dans un des plus gros fichiers ZIP contenu dans cette 
disquette (il fait 91 Ko) se trouve TERSE, un des plus 
petits éditeurs de textes. Il ne fait que 4096 octets. La 
taille de ce fichier ZIP est justifiée par la présence de 
plusieurs versions du programme (avec des 
possibilités étendues) accompagnées chacunes de ses 
propres programes de configuration. Ainsi que d’une 


doc faisant plus de dix fois la taille du programme lui 
même. 


Directory CALC 
Dans ce directory ne se trouvent que deux 
programmes émulant des  calculatrices, mais 


extrèmement puissants par rapport aux programmes 
du même type sortis auparavant sur nos palmtops. 


Le premier, nommé EXCALC, est très orienté vers le 
scientifique et l’analyse des fonctions. Un peut 
comme pour les HP28 et HP48 (mais beaucoup 
moins bien, tout de même !), il est possible d'évaluer 


des expressions symboliques. Parmi ses autres 
possibilités, on peut citer en vrac : intégration 
numérique, dérivation, statistiques, Fonctions 


d'Euler8, conversions d'unités, tracé de fonctions. Si 
ces capacités sont très aléchantes, on peut cependant 
regretter un certain manque d’ergonomie, non corrigé 
par une doc pas toujours très explicite. 


Quant au deuxième programme, son abscence sur 
cette disquette aurait pu me valoir (et à juste titre) 
ma destitution de mon poste de président de PPC 
Paris ! En effet, si nous le lançons (sous un nom tout 
à fait commun : PSCALC95), nous voyons apparaitre un 
affichage ressemblant furieusement à un écran de 
HP48SX... Il s’agit en effet d’un programme émulant 
le fonctionnement de la machine, y compris la 
programmation en User RPL ! Bien entendu, le 
programme ne faisant que (?) 80 ko, il ne contient 
qu’une petite partie des fonctions de la machine 
originale et ne gère ni le graphisme ni le calcul 
symbolique ni la possibilité de stocker et lire les 
programmes sur disque. De plus, il est bien sûr 
impossible d’y faire tourner des programmes System 
RPL ou assembleur. Mais malgré ces manques, ce 
programme permet une première approche du 
fonctionnement de la machine, avec ses principales 
fonctions et quelques types d'objets (variables, 
programmes, directories.). Il est aussi à noter que la 
version incluse dans la disquette ne sauvegarde pas le 
contenu de sa mémoire (programmes et données) sur 
le disque interne du HP95. Pour obtenir cette 
fonction, 1l vous faudra acquérir votre licence 
d'utilisation. 


Directory TEXTES 


Quelques petits fichiers textes (en Anglais, of 
course !), dont une discussion à propos des cartes 
PCMCIA. Elle date de 1991, c’est à dire avant 
l’aparition de le version 2.0, mais certains points sont 
toujours d'actualité. 
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Directory PROGRAMR 


Un seul fichier dans ce répertoire. Il s’agit d’un petit 
langage mixant le Basic et Le Forth. Il est peut 
sembler plus difficile à apprendre que le Swift! Basic, 
mais la doc est très complète et il est accompagné de 
nombreux exemples de sources. Et il est beaucoup 
moins cher. Bien entendu, vous serez tout à fait 
invités à publier vos propres programmes dans JPC ! 


Directory APPLICS 


Trois programmes d’application dans ce répertoire. 
Le premier (plutôt destiné aux consultants et 
travailleurs indépendants) permet de comptabiliser 
jour par jour les heures de travail concernant chaque 
affaire, de les  totaliser puis  d’établire 
automatiquement les factures correspondantes. 


Le deuxième programme permet d’effectuer de 
calculer avec une grande précision la distance entre 
deux points sur une sphere, est aussi sur une certaine 
autre ayant la particularité d’être légèrement 
applatie : la Terre. 


Dans le même esprit, le dernier programme permet 
de calculer les heures de lever et de coucher la lune. 
Utile s’il y a des loup-garous parmi les membres du 
club... 


Directory JEUX 


Rien d’extraordinaire : des jeux d’aventures en mode 
texte, des petits jeux d’arcade et une simulation du 
Spirographe de notre enfance. Un petit conseil 
cependant à ceux qui projettent d'utiliser ces 
programmes pendant les cours ou les réunions 
n'oubliez pas de couper le son ! 


Directory DIVERS 


Comme pour toute disquette de compilation, il y à 
toujours quelques programmes inclassables : ce ne 
sont pas des utilitaires, n1 des jeux, ni tout autre 
chose. 


Tout d’abord, pour se reposer de leffort intellectuel 
causé par l’utilisation des programmes du directory 
précédent, J'ai inclus quelques programmes faisant 
fonction d'économiseurs d'écran, bien que pour le 
LCD le problème ne se pose pas vraiment. 


Enfin, certains d’entre vous ont peut être pu voir, 
dans des expositions ou des salons, des "tableaux" ne 
semblant rien représenter, si ce n’est des minuscules 
points de couleurs disposés de façon aléatoire ou 
rythmique. Il s’agit de lexploitation d’un phénomène 
découvert par Bela Julesz, montrant que si on focalise 
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son attention sur un point fictif situé au delà du plan 
du tableau, on percoit une sensation de relief... Pour 
ma part, et malgré de nombreux essais, j'ai été 
incapable d'y voir quoi que ce soit (oui, je sais, 
certaines mauvaises langues diront que le simple fait 
d’être président de ce club prouve que l’on n’est pas 
normal !)}, mais je vous laisse tenter votre chance. 
Vous pouvez me tenir au courant de vos résultats, 
mais si vous m’annoncez que vous y avez vu l’image 
du successeur du HP100, j'aurais quand même un 
petit doute ! 


Jacques Belin (123) 





HP95 ET HP100 : 
LES FONCTIONS INTERNES 


Les personnes qui on pu prendre le temps de lire les 
sources des programmes que j'ai publié dans de 
précédents numéros (je pense plus particulièrement à 
celui de 95PANEL) ont dû s’aperçevoir que j'utilisais de 
temps en temps des fonctions non documentées dans 
les ouvrages traitant des IBM PC. 


Ceci est dû au fait que si nos palmtops possèdent la 
plupart des fonctions présentes sur les ordinateurs de 
bureau, ils possèdent aussi de nombreuses fonctions 
inédites, traitant par exemple, du contraste de l’écran 
ou la gestion des piles. Et je ne parle pas du "gros 
morceau" sur les HP95 et HP100 : les fonctions 
permettant de programmer des programmes System 
Manager. 


Malheureusement, la politique de Hewlett-Packard 
ayant radicalement changé depuis le temps des 
HP-71, les seules personnes ayant accès aux 
renseignements concernant ces fonctions sont celles 
qui se sont fait enregistrer, dans le but de développer 
des applications commerciales. Les autres doivent se 
contenter des quelques fichiers d’informations 
provenant de CompuServe, qui si ils décrivent bien en 
détail les fonctions graphiques ou la programmation 
System Manager, ne font absolument aucune 
référence directe à certains aspects des fonctions 
internes, telles que l'utilisation des ports 
d’entrées-sortie. Pire, un autre aspect capital (les 
fonctions internes regroupées sous l'interruption 15h) 
sont totalement occultées, puisqu'il ne me semble 
même pas y avoir vu une seule référence à ce sujet. 


Cependant, si l’on prend la peine d'examiner en détail 
certains programmes et certaines portions de la Rom 
des Palmtops, il est tout à fait possible de découvrir 
les informations qui nous intéressent. 


Cet article représente l’état de mes recherches. Bien 
que Je n’ai pas encore totalement décrypté l'ensemble 
des fonctions, je pense qu'il pourra déjà intéresser 
certaines personnes. 


Mais avant de commencer, je tiens à rappeler 
qu'étant donné le sujet (et les méthodes que j'ai 
utilisé pour décoder ces fonctions), ni moi ni PPC 


Paris ne peuvent être tenus responsables de 
problèmes pouvant survenir suite à l’utilisation de ces 
fonctions dans vos programmes. Vous voilà 
prévenus ! 

Remarques générales 

Toutes ces fonctions sont regroupées sous 


l'interruption 15h, avec des numéros de fonctions 
compris entre 41h et 62h (certains d’entre eux ne sont 
pas utilisés). 


En plus de la méthode officielle (laccès par les 
interruptions), je vous donnerais aussi les méthodes 
plus "directes" permettant de d’ecrire ou lire les 
valeurs courantes. Ce sont souvent celles-ci que j'ai 
utilisé pour SSPANEL. 


La raison en est que si certaines fonctions permettent 
de selectionner une valeur, il n’est souvent pas 
possible de lire la valeur courante (voir ma remarque 
à propos du contrôle du volume). 


Cependant, les HP95 et HP100 étant totalement 
différents au miveau matériel, l'utilisation de ces 
méthodes directes rendront fatalement le programme 
incompatible avec lune des machines. Elles ne sont 
donc à utiliser qu’en dernier recours. 


Programmation des ports 


C’est ici que nous voyons que ces différences. Alors 
que sur le HP95, les ressources matérielles sont 
accessibles par différents ports, le HP100 n’accède au 
matériel spécifique que par l'intermédiaire de deux 
ports (22h et 23h) adressant plusieurs registres 
matériels. 


Pratiquement cela se fait comme ceci : 
Lecture d’un port HP95 : 


mov  dx,port 


in al ,dx -+ al contient la valeur courante 


Lecture d’un registre HP100 : 


mov al,registre 


out  <éh,al 

in al,23h + al contient la valeur courante 
Ecriture d’un port HP95 : 

mov dx,port 

mov  al,raleur 

out  dx,al 


Ecriture d’un registre HP100 : 


mov al,registre 


out 22h,al 
mov  al,valeur 
out 23h,al 


Conventions d'écriture 


Il n’est peut-être pas inutile de rappeler ici quelques 
conventions d'écriture ! 


- Le terme "mot" indique un groupe de deux octets 
(Un "double mot" indique un groupe de quatre 
octets). Sur IBM PC, rapelez vous qu'ils sont stockés 
de façon inverse à leur ordre dans les registres du 
microprocesseur. C’est à dire que dans la mémoire, si 
ils sont stockés sous la forme "1234h", ils seront lus 
apparaitront dans les registres sous la forme "3412". 

- À l’intérieur d’un octet, les bits seront numérotés de 
0 à 7. 0 représentant le bit de poids faible et 7 celui de 
poids fort. 


LISTE DES FONCTIONS 
Gestion d’évenements 
Disponibilité : HP95 et HP100 


Bien que non spécifique au HP95 (elle est implantée 
dans de nombreux Bios dont le Phoenix) cette 
fonction est très peu documentée. Je n’ai pas eu 
occasion de développer des programmes l’utilisant, 
et ne peut donc pas vous donner beaucoup de détails 
à ce sujet. 

Elle permet d'interrompre l’exécution du programme 
jusqu'à ce qu'une condition externe intervienne 
(valeur dans un port ou dans une adresse mémoire) 


ou qu’un intervale de temps donné se soit écoulé. 


Disponible sur HP95 et HP100. 
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Valeurs d’entrée : 
AH = 4ih 
AL = condition 
bits 0-2: condition à attendre 
0 tout evennement externe 
1 compare et retourne si égal 
2 compare et retourne si non égal 
3 teste et retourne si non Zéro 
4 teste et retourne si Zéro 
bit 3: reservé 
bit 4 1=port, Ü=octet mémoire 
bits 5-7: reservé 
BH = valeur de comparaison ou valeur de masque 
BL = valeur de timeout en ticks de 55 ms 
00h si pas de timcout 
DX = numéro de port, si bit 4 de AL = 1 
ES:DI -> octet mémoire, si bit 4 de AL = 0 


Extinction de la machine 


Cette fonction permet à un programme d’éteindre 
automatiquement la machine. 


Disponible sur HP95 et HP100. 


Valeurs d'entrée : 
AH = 42h 


Contrôles de la fenêtre d’affichage. 


Cette fonction gère les fonctions Cursor Tracking et 
Alt Arrows, permettant contrôler respectivement le 
déplacement de la fenêtre lorsque le curseur quitte 
celle-ci et ce même déplacement grace à l’action des 


touches  [CAlt]+{Flèches] sur le HP95 et 
[Menu]+[Flèches] sur le HP100. 
Disponible sur les HP95 et HP100. 
Valeurs d’entrée : 
AH = 45h 
AL = combinaison des deux flags : 
Cursor Tracking Alt Arrowus 
00 : désactivé désactivé 
01 : désactivé activé 
02 : activé désactivé 
Û3 : activé activé 


Accès direct : 
HP95 et HP100 : octet situé en 40h:93h 
(format identique au paramètre). 
Controle du Timeout 
Cette fonction permet de sélectionner le temps 


d’auto-exctinction de la machine. 
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Disponible sur HP95 et HP100. 


Valeurs d'entrée : 
AH = 46h 
BX = Temps, en Ticks de 55 ms 


Une valeur de zéro désactive le timeout. 

Valeur maxi = 65536 ticks, soit une heure. 

La valeur par défaut (réinitialisée après chaque 
[LCtr1l] [Alt] [IDel]) est fixée à CCCh (3 minutes). 


Accès direct 


HP95 et HP100 : mot situé en 40h:A3h. 


Controle du contraste 


Cette fonction permet de régler le contraste de 
l'écran. 


Elle est disponible sur les deux machines, mais le 
HP100 possède en plus une deuxième fonction 
parallèle à la première permettant de d’obtenir 32 
niveaux de contraste, au lieu de 16 sur le HP95, 


Sélection 
HP95 et HP100 : 


Valeurs d'entrée : 
AH = 47h 
AL = 00 
BL = Valeur du contraste (0 à 15) 


HP100 uniquement : 
Valeurs d’entrée : 
AH = 62h 
AL = 00 
BL = Valeur du contraste (0 à 31) 
Lecture 


HP95 et HP100 : 


Valeurs d'entrée : 
AH = 47h 
AL. = 01 


Valeurs de sortie : 
AL = Contraste courant 


HP100 uniquement : 
Valeurs d'entrée : 


AH = 62h 
AL = 01 


Valeurs de sortie : 
AL = Contraste courant 


Accès direct 
HP9S : bits 4-7 du port E309h 


HP100 : Suivant les modes d'écriture et de lecture, le 
HP100 semble travailler sur 3 registres différents : 

- Lorsqu'il utilise la fonction 47h en lecture, ce sont 
les bits 4-1 du registre 23h qui sont lus. 

- Lorsqu'il utilise la fonction 62h en lecture, ce sont 
les bits 4-0 de ce même registre qui sont utilisés. 

- Lorsqu'il utilise la fonction 47h en écriture, ce sont 
les bits 4-1 du registre OFh qui sont modifiés. 

- Lorsqu'il utilise la fonction 62h en écriture, ce sont 
les bits 4-0 du registre 1Fh qui sont modifiés. 


Controle du Volume Sonore 
Disponible sur HP95 et HP100. 
Sélection 
Valeurs d'entrée : 

AH = 48h 

AL = Volume (entre 0 et 3) 
Lecture 
Alors qu’il est possible de lire la valeur du contraste, 
il n’est pas possible de lire la valeur courante du 
volume. Pourtant on peut considérer que ce sont deux 
fonctions soeurs. Je trouve que cela manque un peu 
de cohérence. 


Accès direct 


HP9S : bits 3-2 du port E309h 
HP100 : bits 7-6 du registre 1Eh 


Contrôle du port de sortie 

Cette fonction permet de sélectionner le port de 
sortie des communications Interface série ou 
RS-232. 

Disponible sur HP95 et HP100,. 


Valeurs d’entrée : 


AH = 49h 
AL = port de sortie 
0 : RS-232 


1 : Infra-Rouge 


Accès direct 
HP9S : bit 2 du port E30Ah 
Activation de la liaison série 


Cette fonction permet d’activer ou désactiver la 
liaison série. 


Disponible sur HP95 et HP100. 


Valeurs d’entrée : 
AH = 4Ah 
AL. = 
0 : Désactivation 
1 : Activation 


Accès direct 


HP95 : bit 2 du port E301h 
HP100 : bit 2 du registre 1Eh 


Synchronisation du timer 


Cette fonction permet de remettre le timer interne 
(double mot situé à l'adresse 40h:6Ch et remis à jour 
tous les 18.2 secondes environ.) à l’heure par rapport 
à l'horloge temps réél. Cette fonction doit être utilisée 
en fin d'exécution d’un programme modifiant la 
fréquence de mise à jour du timer (le programme 
devant avoir auparavant restauré la fréquence 
initiale). 


Disponible sur HP95 et HP100. 


Valeurs d'entrée : 
AH = 4Bh 


Controle du Clavier 


Cette fonction permet de contrôler la langue du 
clavier : AZERTY ou QWERTY. 


Disponible sur HP95 et HP100, mais utilisation 
restreinte sur la version Francaise du HP100. 


Sélection 


Valeurs d'entrée : 

AH = 4Ch 

AL = 00 

BX = Code langue du clavier 
0001h : Belge 
0002h : Canadien Français 
0004h : Danois 
0008h : Finlandais (???) 
0010h : Français 
0020h : Finlandais (7???) 
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0040! : 
0080h : 
0100h : 
0200h : 
0400 : 
0800h : 
1000h : 
2000 : 
4000h : 
8000h : 


Italien 

Hollandais 

Norvégien 

Portugais 

Espagnol 

Suédois 

Suisse Francophone 
Suisse Germanophone 
Royaume uni 

USA (QWERTY) 


Lecture de la valeur courante 


Valeurs d’entrée : 
AH = 4Ch 
AL = 01 


Valeurs de sortie : 
AX = Code langue (voir ci dessus) 


Accès direct 


HPS9S5 : mot situé en 40h:96h 
HP100 : mot situé en 40h:9Dh 


Lecture des valeurs admises par la Rom 


Valeurs d’entrée : 
AH = 4Ch 
AL. = 02 


Valeurs de sortie : 
AX = Combinaison des Codes ci-dessus 


La version Française du HP95 retourne la valeur 
8010h, indiquant bien que l’on peut sélectionner cette 
machine en QWERTY et en AZERTY. 


Par contre, la version Française du HP100 ne peut 
pas être configurée en QWERTY. Ce qui est 
confirmé par le fait que cette fonction retourne la 
valeur 0010h. 


Controle de la langue de travail 
Cette fonction permet de contrôler la langue 
d'affichage des messages DOS et des écrans System 
Manager. 
Disponible sur HP95 et HP100, mais utilisation 
restreinte sur la version Francaise du HP100, qui ne 
travaille qu’en Français. 
Sélection 

Valeurs d’entrée : 


AH = 4Ch 
AL = 10h 
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BL = Code langue 
00h : Anglais 
01h : Français 


Lecture de la valeur courante 


Valeurs d’entrée : 
AH = 4Ch 
AL = 11h 


Valeurs de sortie : 
AL = Code langue (voir ci dessus) 


Accès direct 


HP95 et HP100 : octet situé en 40h:92h 


Controle du type de la machine 


Cette fonction permet au programme de vérifier que 
l’on travaille bien sur un HP95 ou un HP100 (une 
autre machine retournant des valeurs incohérentes). 


Disponible sur HP95 et HP100. 


Valeurs d'entrée : 
AH = 4Dh 
AL = Déh 


Valeurs de sortie : 
BX = 4850h : codes ASCII des caractères "HP" 
CH = 1 (pour les HP95 et 100) 
CL = type de la machine 
1 : HP95 
2 : HP100 
DL = Numéro de version de la Rom 


Controle du Light Sleep 


Cette fonction permet d'activer ou désactiver 
l’auto-extinction de la machine, après un temps de 
non-utilisation défini par la fonction 46h (voir 
ci-dessus). 


Disponible sur HP9S et HP100. 


Valeurs d’entrée : 
AH = 4Eh 
AL = Valeur 
0 : Désactivé 
1 : Activé 


Accès direct 


HP95 et HP100 : octet situé en 40h:D6h 


Lecture de la tension des batteries 


Cette fonction permet de lire la tension des batteries 
internes de la machine : Alimentation principale 
(piles 1.5V) et Backup (pile "bouton"). Elle ne permet 
pas de lire la tension de la pile interne des cartes Ram 
PCMCIA. 


Comme pour le contraste, le HP100 possède une 
fonction parallèle. Celle ci donne les résultats sous 
une forme différente. 


Version pour HP95 et HP100. 


Valeurs d’entrée : 
AH = 50h 
AL = Batterie 
0 : Piles Principales 
1 : Pile de Backup 


Valeurs de sortie : 
AX = Valeur de tension 
(si FFFFb, erreur) 


La valeur de la tension est donnée dans un code 
particulier. Afin de la connaitre en volts, vous pouvez 
utiliser le code suivant : 


moy ah,50h 
moy  al,pile 
int 15h 

and  ax,00ffh 
moy dl,05h 
div di 

dec ax 

cm al,19 
jnb suite 
inc ah 

cmp al,14 


jnb suite 
inc ah 
Labels: ... 


Ceci place en AL la tension exprimée en dixièmes de 
volts. Je n’ai pas fait de mesure exacte quant à ce 
résultat, mais 1l semble assez précis aux environs de la 
limite fatidique des 2 Volts ! 


Version pour HP100 uniquement. 


Valeurs d’entrée : 
AH = 60h 
AL = Batterie 
00 : Piles Principales 
01 : Pile de Backup 


Valeurs de sortie : 
AX = Valeur de tension 
(si FFFFh, erreur) 


Comme pour la fonction précédente, il est nécessaire 
de recourir à quelques lignes de codes afin d’obtenir 
une valeur plus facilement exploitable, cependant la 
méthode est ici plus simple, puisqu'il suffit d'effectuer 
l’opérations suivante : 


Contenu de AL 
Valeur en Volts = 1.6 + ------.... 


Les valeurs 1.6 et 37.333 sont relativement 
empiriques, mais donnent un résultat juste au dixième 
de volt près. 


Afin d’avoir le même type de résultat que pour la 
fonction précédente (c’est à dire exprimé en dixièmes 
de volts), vous pouvez utiliser la routine suivante : 


mov  ah,60h 
mov al,pile 
int 15h 

mov  dl,10 
mul dl 

mov  dl,37 
div dl 

add al,ié 


Sélection du type de piles 


Cette fonction permet de sélectionner le type de piles 
installées dans la machine Alkaline ou 
Cadmium-Nickel. 


Disponible sur HP100 uniquement. 
Valeurs d’entrée : 
AH = 60h 
AL = 03h 
BL = Code type de piles 
00h : Alkalines 
01h : Cadmium-Nickel 


Accès direct 


bit 7 de octet situé en 40h:D4h 


Activation recharge batteries 
Cette fonction permet d’activer ou de désactiver la 


recharge des piles lorsque l’adaptateur secteur est 
installé. 
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Disponible sur HP100 uniquement. 


Valeurs d'entrée : 


AH = 60h 
AL = 04h 
BL = 


00h : Désactivation 
01h : Activation 


Accès direct 
bit 3 de octet situé en 40h:D4h 
Lecture état des flags batterie 


Cette fonction permet de lire létat des deux 
informations précédentes : Type de piles et activation 
de la recharge ainsi que le temps de recharge des 
batteries. 


Disponible sur HP100 uniquement. 


Valeurs d’entrée : 
AH = 60h 
AL = 02h 


Valeurs de sortie : 
AL = valeurs courantes 
bit 7 : type de pile 
bit 3 : flag recharge 


D'autre part, la fonction retourne deux valeurs en CX 
et DX indiquant le temps de recharge des batteries. 
N'ayant pas eu l’occasion de faire des tests avec 
l'adaptateur secteur, je ne connais donc ni la 
signification exacte des données (temps écoulé ou 
temps restant ?) ni leur format. La seule chose 
certaine est que ces résultats sont contenu dans les 
mots situés en 9000:F848 et 9000:F84A. 


Autres fonctions : 


Si j'ai pu trouver les informations sur les fonctions 
précédentes, certaines me posent encore des 
problèmes. A titre indicatif en voici une liste succinte 
(elles concernent toutes le HP100 uniquement) : 


- Fonction 51h : Aucune information précise, si ce 
n’est qu’elle semble concerner les batteries, puisque 
son code est situé entre les fonctiosn 50h et 60h. Elle 
admet un paramètre en AL 


- Fonction 60h / sous-fonction 05 : Charge en 40:D0 
et 40:D2 un paramètre situé en BX. La valeur située 
en 4:D0 est décrémentée 18.2 fois/seconde. Valeur 
initiale 10Eh=15 secondes. Je vous rappelle que la 
fonction 60 à trait aux batteries. 
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- Fonction 60h / sous-fonction 06 : Lit la valeur du bit 
2 de l’octet situé en 49:CD. 


- Fonction 61h : Lorsque le bit 5 de AL est désarmé, 
charge en AL les bits 6 et 7 de l’octet situé en 40:EB. 
Lorsque le bit 5 est armé, charge les bits 6 et 7 de AL 
dans cet octet. Cette fonction est insérée entre les 
deux fonctions traitant du contraste, mais l’octet situé 
en 40:EB est situé en plein milieu d’une zone 
concernant uniquement le clavier. Aucune action 
visible. 


Je compte continuer mes recherches à propos de ces 
fonctions ce mois-ci. Mais si certains d’entres-vous 
veulent se joindre à moi dans l'exploration de ces 
dernières fonctions, ils sont bien entendu les 
bienvenus ! Affaire à suivre... 


Jacques Belin (123) 


LE COIN DES CODES 


Voir les articles de Guy Toublanc, parus ce mois ci, à propos des programmes ASSCOD28 et ASSCOD48. 


MNU (HP28) 020: 4A20 5100 0C69 676E  9F7 053: 1805 OCCD 8143 1301 E77 
# B6BBh 55.5 octets 021: 6560 2A30 22F6 5011 SDE 054: 7414 3131 1793 1931  9E9 
022: 920F FFO0 D2F6 0016 326 055: 5819 EA80 8186 8615  6CD 
0123 4567 89AB CDEF sm 023: CO3C E138 2B13 1D17  O6B 056: 8017 1160 CD54 E8D5 580 
O24: O5E1 70FC 1402 8B30  D67 057: E521 C1éD 3379 5009  21B 
000: 76C2 OE4A 20F1 0006  Céé 025: A4O02 OE4A 2031 0003 899 058: F20 355 
001: 8124 262C 7A3B 3C8F BC5 026: 6F64 6563 7O2A 3E4A 6AS 
002: 5E70 4C58 1B22 7OCA  A35 027: 2082 0000 202D 2020 435 
003: 850A 4020 2F65 OA4O  6C3 028: 2D2D 2D2D 202D 2D2D  30D MANDEL (HP48) 
008: 20FC 140D E440 5E02 428 029: 2D20 2D2D 2D2D 2689 143 # GAA6h 733 octets 
005: 0508 5060 1208 2270  FA9 O2A: D32F 6505 5E60 49CD FEF 
006: FFE3 01A1 A009 F20 9FA 02B: 376C 2026 SD3A 4020  C7E 0123 4567 89AB CDEF sm 
DC: 1D17 0750 70C1 6D3D  A8a2 
02D: 2F60 3817 OSEO 20F7  7E9 000: D9D2 OOFE 8111 9201 C36 
ASSCOD28 (HP28) O2E: F60F C140 09F2 03B1 510 001: 2200 D9D2 07S9E 60D9  AA1 
# 9498h 05.5 octets 02F: 7OCD 8C03 B170 8C8C 3E5 002: D203 3920 6000 0000  4CE 
030: O3AC D376 C20C 56D3 255 003: 6758 4010 CB9A 2881  24C 
0123 4567 89AB CDEF sm 031: A112 0751 2024 8E0C F5E 004%: 304B 2A21 78A2 3991 F47 
032: 1603 09F2 076C 2083 C41 005: 6D9D 2002 9A29 F345  CCB 
000: 76C2 060B AOF1 4507  D0O9 033: 9038 E450 O9F2 OSEF  BO4 006: E4A2 0600 0003 2230 74E 
001: 6020 A211 OO00C B1DE  B83 034: D148 1203 7650 E602 726 007: OBE3 5B21 309F 3458 528 
002: BB13 ABBT F/04 0376  8BE 035: O5E0 20A3 822B 35C0 450 008: 2130 FC43 6009 A29F  34B 
003: S0A4 0203 1CB1 3765 576 036: EA9E 3FB6 50/6 C20E  2E8 009: 35453 2230 C2D5 0683 085 
004: 0877 AOB8 AT1F B650 389 037: 6020 3B17 05E0 20F7 018 O0A: 16E8 F603 2230 6B31 CE9 
005: 76C2 009F 206B 6501  01C 038: F60F C140 6360 306F  DFD O0B: GEBF 6DA8 150A 8150  9A6 
006: BC91 4812 OAOD 6034  D73 039: 6048 1202 CO40 FC14 BE O0C: 3223 O0C2D 5068 316E 785 
007: CD37 86F3 76C2 014D  B3F O3A: 028B 3009 F206 B650 804 00D: 8F60 3223 0683 16E8  4CE 
008: Cc148 120A OD60 3ACD  A15 038: 7512 0A11 2094 1704 405 O0E: F60A 8150 A815 020€ 181 
009: 376C 2060 1203 8170  SDA 03C: 8120 2C04 OCA8 5048 107 OOF: 4601 C167 9470 FC2E 071 
OCA: 4812 O2C0 40F7 F60F 446 030: 1202 F650 A402 OFCT E83 010: 4A64 0579 E60OC CD20  EDA 
00B: C140 O9F2 O76C 2028  O0EB 03E: 408C A308 0440 2F65  B5E 011: 8730 0845 8FB9 7603  C22 
OOC: B30A 4020 2C04 O0U6F DAS 03F: 0220 70D2 F605 0850  7AQ 012: 1E1A E51B CF20 0152 948 
OCD: 608D 1707 5070 6012  90D 040: 119D 3D2F 6044 0201 420 013: 71F1 D200 1577 7781  63E 
O0E: 083E 603B 170C D8C0O 781 041: 1920 0001 0750 7060 EF3 014: A6D5 8F15 0710 016F  31F 
O0F: 8EC6 0406 SOBE 9E30 583 042: 120E 4A20 1300 037F B6E 015: 17F3 104A E515 2715  FBé 
010: 9F20 33C6 009F 2099  2B0 043: 6D6D 6560 2465 6023 738 016: 77B7 AA6D 59F1 5071  D61 
011: 6500 9F20 0861 3CD5  O&A 044: 6F6E 6472 7F6C 6560  4F6 017: 6F15 0716 F118 1547  9CS 
012: 117F 6133 B170 FA8C E75 045: 2A30 23/70 68B6 D35E  3ED 018: 16F1 5071 FB62 0014  60D 
013: OE&A 2092 OOÛE 6FéD  CEU 046: O20E 4A20 B000 OD3D 174 019: 7D71 BFB2 0015 2710 213 
014: 6262 7560 2467 2F63 997 047: 3D38 3903 8E45 0980  EA9 OA: 1103 16F1 5671 OA10  E2C 
015: 6475 6473 7O2A 302F 693 048: F35E 0202 8B30 22A2 B36 018: C11A 108A FA72 8110 B27 
016: 7040 A402 0518 D38E 436 049: 2DA3 40A8 E603 ACD3  A4A 01C: 2119 AFA7 5711 1AAF  A3E 
017: 4503 B170 8C8C O22A  1ED O4A: 4FB6 O76C 2060 1208 631 01D: EB7A 1107 C111 0211  61F 
018: 22ED 2118 4D11 B35C FEB 04B: 3BF3 3B17 O7A8 CO09 3C8 O1E: OAF6 7F01 1197 1511 206 
019: 0942 7075 0705 E020 BBE O4C: F209 9650 ABAD 3016 292 01F: 1871 0110 1AF6 7041 E65 
OTA: E602 071E 6040 6500 736 040: D37D 8D35 E020 2883 009 020: 1001 12AF 6733 1118  ABD 
018: 6F60 636D 306F 60C5 514 O4E: OAAA D350 8500 2BAQ0  D4A 021: 73E0 AF23 5000 0049 651 
01C: 6D39 AT70 F704 OD3F  35C O4F: 7D8D 3A40 202C O40F  A9%6 022: F6F0 CF46 0678 F7C9  57A 
01D: 40AE OE3A 4020 E602 041 050: 7040 4812 0002 7015  61E 023: 1180 5200 1423 4280 088 
0ÎE: OA&O0 206D 170F FE30 EDF 051: F606 6FD3 5E02 069C 440 024: OO08A 2F3E 4140 1B6C  E9F 
01F: 5895 OCA8 5037 650E  Céé 052: 2025 0008 F72F 408F  25à 025: 1001 FF02 0015 3715  A55 
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026: 
027: 
028: 
029: 
02A: 
028: 
02C: 
02D: 


02F: 
030: 
031: 
032: 
033: 
034 : 
035: 
036: 
037: 
038: 
039: 
03A: 
038: 
Val: 
03D: 
03E : 
03F: 
040: 
041: 
042: 
043: 
04& : 
0845 : 
046: 
047: 
048: 
049: 
Ü&A : 
048 : 
Ü&C : 


O&4E : 
O&F : 
050: 
051: 
OS 2: 
053: 
054: 
055: 
056: 
057: 


6771 
0142 
4150 
6F16 
0140 
F300 
B341 
156 


: 1001 


1406 
DE44 
170€ 
1818 
AFOB 
8408 
BF88 
08A3 
7080 
9F25 
FIAF 
263F 
F5E5 
AFOA 
A000 
8408 
c831 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
2038 
F322 
3223 
C000 


: 601 


1457 
F24C 
33DF 
ÎDFF 
DFFC 
FFOÛ 
2C01 
8F14 
18CA 
16CD 


9015 
E4Tà 
1BEB 
F150 
1B8D 
O8A2 
001F 
fB7A 
&2E4 
39EA 
98Dà 
4194 
4170 
F881 
1080 
5081 
9181 
8505 
DAFE 
CAOD 
FBF2 
D086 
fc81 
1461 
> 18F 
0000 
0000 
0000 
000û 
0000 
0000 
0000 
0000 
0000 
0000 
CFF1 
300E 
OA81 
1431 
3110 
OSQ0E 
FF39 
F94D 
e9DF 
AEFF 
0000 
1913 
1641 
C013 
F8F2 
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1718 
06D0 
1001 
716F 
1001 
5CE4 
c810 
1517 
1401 
C181 
3AC1 
D22À 
E4à9 
COTA 
863E 
0814 
6BFA 
5084 
9784 
&COA 
OC5SA 
000B 
CéCE 
6414 
èF83 
0000 
0000 
0000 
0000 
0000 
0000 
O00û 
0000 
0000 
9FF3 
1920 
D305 
20CC 
T4EF 
134C 
èCFF 
CFFA 
FFB4 
FBAD 
&8DF 
#D51 
fE21 
428A 
1147 
D 760 


DO20 
F8F3 
5271 
16ED 
4234 
1401 
0153 
1869 
64D0 
8417 
8184 
FAAC 
4900 
fA01 
0814 
8128 
8128 
0816 
2e0A 
fA41 
E208 
F801 
F1B5 
2108 
18DA 
0000 
O0Oû 
0000 
0000 
oüooû 
000û 
0000 
0000 
0000 
0119 
26FF 
1850 
D204 
BFB9 
CD20 
C3CF 
QCFF 
DFF7 
FFAA 
F1BD 
3414 
0881 
8811 
CAT& 
1118 


310 
124 


8F4 


984 


058: 08c1 
059: 2038 
O5A: 1202 
058: B213 


ASSCOD48 
# 420FhN 


0123 


000: D9D2 
001: 9E60 
002: 130B 
003: 30D0 
004: O2A1 
005: 56F1 
006: E040 
007: 140C 
008: 30BB 
009: 0821 
OCA: CD63 
O0B: DB46 
00C: 140C 
00D: 20FD 
OCE: 0571 
O0F: D9Da 
010: 2130 
011: 916A 
012: 46B2 
013: OBB7 
014: 7FE3 
015: FF30 
Dié: 9160 
017: 308C 
018: 5ADB 
019: 9200 
OA: 6024 
01B: 7370 
01C: 4229 
010: 4#1ED 
01E: 1F80 
01F: A333 
020: ED30 
021: 1616 
022: 5000 
023: OC2A 
024: 6E65 
025: EOE3 
026: BD30 


1920 
COOF 
30CF 
0B21 


4567 


0D48 
D9D2 
9421 
040E 
7088 
LL TS 
C781 
7816 
1269 
3009 
6399 
CBD3 
D636 
040€ 
&OCD 
OF8û 
21B4 
B526 
1305 
26FE 
042 
6773 
BB26 
1708 
4 G6AA 
ÜE6F 
6r2F 
2A30 
FF30 
eAeC 
&O7F 
6FED 
BBFO 
éD25 
& 708 
2051 
602A 
0119 
CC95 


0400 
8511 
1469 


B9AB 


8191 
DA6& 
BB44 
C&A3 
1308 
30D9 
6301 
D9D4 
5236 
D205 
1609 
0Ba21 
3991 
BD30 
6363 
&0CB 
6CDé 
4423 
7A50 
D301 
306A 
32520 
OCA3 
2130 
C35C 
6D62 
6364 
èF31 
5573 
BSA2 
E30C 
30CA 
GFEF 
03D4 
D370 
ÜOOC 
3021 
2000 
0160 


0119  1B3 
5562  DAÛ 
7611  A57 
569 

(HP48) 

699 octets 
CDEF sm 
éC17  D5é 
0588  AAB 
19FF  SA4 
FD55  8A6 
A421 53E 
D209 280 
2611  DD7 
0442 ACC 
OCA3 851 
3040 449 
D20A 29%6 
5034  F4B 
6D9D DFE 
B213  B9à 
9916 BBA 
D306 748 
3639  4Dé 
DA3B  22E 
EE25  O00 
2040  C9A 
C309  9Bé 
e6CB 841 
0821 SAS 
73C3  à25E 
2A2Q0  OCA 
6275 E2A 
7564  ACD 
É1AC  89A 
5731 503 
AEC8 590 
6836 361 
FO6F 374 
30F3 33À 
3AF2 143 
eAi7  E8C 
6967  B2B 
2270 691 
010€ 216 
4571 E50 


027: 
028: 


042: 


045 : 
046 : 
0&r: 
048: 
049: 
O4A : 
0&B : 
O&C : 
040 : 
O&E : 
O&4F : 
050: 
051: 
052: 
053: 
054 : 
055: 
056: 
057: 


0408 
5088 


: DAUA 
" 2ÀA33 


O0D4 
D2D2 
D2D4 
fO4E 
0834 
FFES 
5236 
7359 


: 16D9 


6C2A 


: 236F 
: 1391 


9813 


: SDa0 
2 1304 


fO09F 
64Da 
CA13 
ED30 
150B 


5 26FE 
: Déc? 
: Teer 


3370 


: 920F 
:. 2053 


6D65 
6E64 
3023 
6C2A 
3E04 
B525 
èc26 
2301 
A2A5 
30CA 
OF51 
E226 
6C1C 
2F42 
6365 
E761 
3163 
4171 
0821 


2040 
130C 
036F 
9150 
D2D4 
02Dà 
D2D2 
C30C 
1688 
OB9F 
B213 
FF30 
D208 
2081 
6ère 
5068 
GAC& 
EDU41 
5256 
1169 
26EE 
0952 
2265 
2130 
F302 
3012 
O2CE 
fE31 
FFOÛ 
DOCA 
6024 
fer 
7D62 
£0B0 
16E8 
0731 
18A3 
F514 
1419 
30B2 
6B9F 
0E51 
2A20 
4028 
OFED 
OBBà 
9150 
040C 
50 


3375 
2A20 
6465 
C2Aa 
D202 
D2Dà 
C541 

B916 
1307 
06CB 
O9FF 
-ELÉ 
5230 
0000 
f96r 
3A25 
22Bé 
6E8F 
2C23 
FF30 
1700 
36CA 
0337 
3E17 
2650 
2705 
350CB 
65D7 
1BE3 
DAO3 
6560 
FC65 
0076 
0000 
F603 
4130 
OD9D 
1FBà 
FF30 
1308 
066B 
6433 
3100 
3026 
30E8 
6391 

1947 
9B26 


0391 
100 
6370 
0820 
D2D2 
D2082 
6122 
D9D2 
1040 
D309 
3087 
58DA 
0831 

£0E0 
6564 
9230 
130D 
60B2 
02A1 

1854 
9020 
FO6F 
5039 
0627 
BD37 
0803 
D304 
2611 

OC2A 
fF6D 
236F 
602A 
FE22 
5D3D 
3456 
A50D 

2085 

69C2 
sets 
C170 
316F 

fOF7 
0742 
B316 
E304 
3068 
0731 

366 


C9 
570 
FE 
EBA 
CDé 
A56 
GED 


108 
004 
D96 
C1A 


6EE 
4C6 
FES 
DF7 
A8 
96F 
T6B 
433 
203 
F&a 
D5C 
A85 
6F4 
&7B 
286 
F87 
C1B 
A98B 
780 
30C 
F2F 
D75 
AA6 
657 
364 
F91 
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